vim: src/popupwin.c annotate

annotate src/popupwin.c @ 17048:dcbd3676e9d6

Added tag v8.1.1523 for changeset 6400d1ad5e4b9316385180f7503b6da7405cb76e

author	Bram Moolenaar <Bram@vim.org>
date	Wed, 12 Jun 2019 23:45:04 +0200
parents	6400d1ad5e4b
children	221d4b82bc0b

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
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	18 typedef struct {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	19 char *pp_name;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	20 poppos_T pp_val;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	21 } poppos_entry_T;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	22
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	23 static poppos_entry_T poppos_entries[] = {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	24 {"botleft", POPPOS_BOTLEFT},
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	25 {"topleft", POPPOS_TOPLEFT},
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	26 {"botright", POPPOS_BOTRIGHT},
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	27 {"topright", POPPOS_TOPRIGHT},
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	28 {"center", POPPOS_CENTER}
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	29 };
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	30
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	31 /*
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	32 * Get option value for "key", which is "line" or "col".
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	33 * 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	34 */
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	35 static int
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	36 popup_options_one(dict_T dict, char_u key)
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	37 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	38 dictitem_T *di;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	39 char_u *val;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	40 char_u *s;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	41 char_u *endp;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	42 int n = 0;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	43
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	44 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	45 if (di == NULL)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	46 return 0;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	47
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	48 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	49 if (STRNCMP(val, "cursor", 6) != 0)
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	50 return dict_get_number_check(dict, key);
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	51
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	52 setcursor_mayforce(TRUE);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	53 s = val + 6;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	54 if (*s != NUL)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	55 {
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	56 endp = s;
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	57 if (skipwhite(s) == '+' \|\| skipwhite(s) == '-')
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	58 n = strtol((char )s, (char *)&endp, 10);
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	59 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	60 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	61 semsg(_(e_invexpr2), val);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	62 return 0;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	63 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	64 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	65
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	66 if (STRCMP(key, "line") == 0)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	67 n = screen_screenrow() + 1 + n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	68 else // "col"
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	69 n = screen_screencol() + 1 + n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	70
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	71 if (n < 1)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	72 n = 1;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	73 return n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	74 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	75
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	76 static void
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	77 get_pos_options(win_T wp, dict_T dict)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	78 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	79 char_u *str;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	80 int nr;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	81
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	82 nr = popup_options_one(dict, (char_u *)"line");
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	83 if (nr > 0)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	84 wp->w_wantline = nr;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	85 nr = popup_options_one(dict, (char_u *)"col");
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	86 if (nr > 0)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	87 wp->w_wantcol = nr;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	88
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	89 wp->w_popup_fixed = dict_get_number(dict, (char_u *)"fixed") != 0;
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	90
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	91 str = dict_get_string(dict, (char_u *)"pos", FALSE);
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	92 if (str != NULL)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	93 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	94 for (nr = 0;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	95 nr < (int)(sizeof(poppos_entries) / sizeof(poppos_entry_T));
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	96 ++nr)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	97 if (STRCMP(str, poppos_entries[nr].pp_name) == 0)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	98 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	99 wp->w_popup_pos = poppos_entries[nr].pp_val;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	100 nr = -1;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	101 break;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	102 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	103 if (nr != -1)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	104 semsg(_(e_invarg2), str);
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	105 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	106 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	107
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	108 static void
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	109 get_padding_border(dict_T dict, int array, char *name, int max_val)
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	110 {
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	111 dictitem_T *di;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	112
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	113 di = dict_find(dict, (char_u *)name, -1);
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	114 if (di != NULL)
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	115 {
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	116 if (di->di_tv.v_type != VAR_LIST)
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	117 emsg(_(e_listreq));
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	118 else
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	119 {
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	120 list_T *list = di->di_tv.vval.v_list;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	121 listitem_T *li;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	122 int i;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	123 int nr;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	124
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	125 for (i = 0; i < 4; ++i)
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	126 array[i] = 1;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	127 if (list != NULL)
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	128 for (i = 0, li = list->lv_first; i < 4 && i < list->lv_len;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	129 ++i, li = li->li_next)
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	130 {
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	131 nr = (int)tv_get_number(&li->li_tv);
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	132 if (nr >= 0)
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	133 array[i] = nr > max_val ? max_val : nr;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	134 }
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	135 }
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	136 }
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	137 }
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	138
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	139 /*
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	140 * Used when popup options contain "moved": set default moved values.
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	141 */
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	142 static void
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	143 set_moved_values(win_T *wp)
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	144 {
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	145 wp->w_popup_curwin = curwin;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	146 wp->w_popup_lnum = curwin->w_cursor.lnum;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	147 wp->w_popup_mincol = curwin->w_cursor.col;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	148 wp->w_popup_maxcol = curwin->w_cursor.col;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	149 }
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	150
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	151 /*
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	152 * Used when popup options contain "moved" with "word" or "WORD".
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	153 */
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	154 static void
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	155 set_moved_columns(win_T *wp, int flags)
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	156 {
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	157 char_u *ptr;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	158 int len = find_ident_under_cursor(&ptr, flags \| FIND_NOERROR);
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	159
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	160 if (len > 0)
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	161 {
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	162 wp->w_popup_mincol = (int)(ptr - ml_get_curline());
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	163 wp->w_popup_maxcol = wp->w_popup_mincol + len - 1;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	164 }
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	165 }
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	166
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	167
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	168 #if defined(FEAT_TIMERS)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	169 static void
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	170 popup_add_timeout(win_T *wp, int time)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	171 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	172 char_u cbbuf[50];
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	173 char_u *ptr = cbbuf;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	174 typval_T tv;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	175
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	176 vim_snprintf((char *)cbbuf, sizeof(cbbuf),
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	177 "{_ -> popup_close(%d)}", wp->w_id);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	178 if (get_lambda_tv(&ptr, &tv, TRUE) == OK)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	179 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	180 wp->w_popup_timer = create_timer(time, 0);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	181 wp->w_popup_timer->tr_callback = get_callback(&tv);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	182 clear_tv(&tv);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	183 }
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	184 }
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	185 #endif
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	186
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	187 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	188 * 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	189 * popup window "wp".
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 static void
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	192 apply_options(win_T wp, buf_T buf UNUSED, dict_T *dict)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	193 {
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	194 int nr;
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	195 char_u *str;
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	196 dictitem_T *di;
16888 ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	197 int i;
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	198
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	199 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	200 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	201 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	202 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	203
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	204 get_pos_options(wp, dict);
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	205
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	206 di = dict_find(dict, (char_u *)"zindex", -1);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	207 if (di != NULL)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	208 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	209 wp->w_zindex = dict_get_number(dict, (char_u *)"zindex");
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	210 if (wp->w_zindex < 1)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	211 wp->w_zindex = POPUPWIN_DEFAULT_ZINDEX;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	212 if (wp->w_zindex > 32000)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	213 wp->w_zindex = 32000;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	214 }
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	215
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	216 #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	217 // 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	218 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	219 if (nr > 0)
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	220 popup_add_timeout(wp, nr);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	221 #endif
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	222
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	223 // Option values resulting in setting an option.
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	224 str = dict_get_string(dict, (char_u *)"highlight", FALSE);
16806 306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	225 if (str != NULL)
306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	226 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	227 str, OPT_FREE\|OPT_LOCAL, 0);
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	228
17047 6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	229 wp->w_firstline = dict_get_number(dict, (char_u *)"firstline");
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	230 if (wp->w_firstline < 1)
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	231 wp->w_firstline = 1;
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	232
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	233 di = dict_find(dict, (char_u *)"wrap", -1);
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	234 if (di != NULL)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	235 {
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	236 nr = dict_get_number(dict, (char_u *)"wrap");
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	237 wp->w_p_wrap = nr != 0;
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	238 }
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	239
16890 5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	240 di = dict_find(dict, (char_u *)"callback", -1);
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	241 if (di != NULL)
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	242 {
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	243 callback_T callback = get_callback(&di->di_tv);
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	244
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	245 if (callback.cb_name != NULL)
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	246 set_callback(&wp->w_close_cb, &callback);
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	247 }
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	248
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	249 di = dict_find(dict, (char_u *)"filter", -1);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	250 if (di != NULL)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	251 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	252 callback_T callback = get_callback(&di->di_tv);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	253
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	254 if (callback.cb_name != NULL)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	255 set_callback(&wp->w_filter_cb, &callback);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	256 }
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	257
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	258 get_padding_border(dict, wp->w_popup_padding, "padding", 999);
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	259 get_padding_border(dict, wp->w_popup_border, "border", 1);
16888 ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	260
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	261 for (i = 0; i < 4; ++i)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	262 VIM_CLEAR(wp->w_border_highlight[i]);
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	263 di = dict_find(dict, (char_u *)"borderhighlight", -1);
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	264 if (di != NULL)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	265 {
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	266 if (di->di_tv.v_type != VAR_LIST)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	267 emsg(_(e_listreq));
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	268 else
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	269 {
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	270 list_T *list = di->di_tv.vval.v_list;
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	271 listitem_T *li;
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	272
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	273 if (list != NULL)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	274 for (i = 0, li = list->lv_first; i < 4 && i < list->lv_len;
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	275 ++i, li = li->li_next)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	276 {
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	277 str = tv_get_string(&li->li_tv);
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	278 if (*str != NUL)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	279 wp->w_border_highlight[i] = vim_strsave(str);
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	280 }
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	281 if (list->lv_len == 1 && wp->w_border_highlight[0] != NULL)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	282 for (i = 1; i < 4; ++i)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	283 wp->w_border_highlight[i] =
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	284 vim_strsave(wp->w_border_highlight[0]);
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	285 }
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	286 }
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	287
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	288 for (i = 0; i < 8; ++i)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	289 wp->w_border_char[i] = 0;
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	290 di = dict_find(dict, (char_u *)"borderchars", -1);
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	291 if (di != NULL)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	292 {
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	293 if (di->di_tv.v_type != VAR_LIST)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	294 emsg(_(e_listreq));
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	295 else
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	296 {
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	297 list_T *list = di->di_tv.vval.v_list;
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	298 listitem_T *li;
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	299
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	300 if (list != NULL)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	301 for (i = 0, li = list->lv_first; i < 8 && i < list->lv_len;
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	302 ++i, li = li->li_next)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	303 {
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	304 str = tv_get_string(&li->li_tv);
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	305 if (*str != NUL)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	306 wp->w_border_char[i] = mb_ptr2char(str);
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	307 }
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	308 if (list->lv_len == 1)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	309 for (i = 1; i < 8; ++i)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	310 wp->w_border_char[i] = wp->w_border_char[0];
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	311 if (list->lv_len == 2)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	312 {
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	313 for (i = 4; i < 8; ++i)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	314 wp->w_border_char[i] = wp->w_border_char[1];
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	315 for (i = 1; i < 4; ++i)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	316 wp->w_border_char[i] = wp->w_border_char[0];
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	317 }
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	318 }
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	319 }
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	320
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	321 di = dict_find(dict, (char_u *)"moved", -1);
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	322 if (di != NULL)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	323 {
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	324 set_moved_values(wp);
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	325 if (di->di_tv.v_type == VAR_STRING && di->di_tv.vval.v_string != NULL)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	326 {
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	327 char_u *s = di->di_tv.vval.v_string;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	328 int flags = 0;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	329
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	330 if (STRCMP(s, "word") == 0)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	331 flags = FIND_IDENT \| FIND_STRING;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	332 else if (STRCMP(s, "WORD") == 0)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	333 flags = FIND_STRING;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	334 else if (STRCMP(s, "any") != 0)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	335 semsg(_(e_invarg2), s);
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	336 if (flags != 0)
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	337 set_moved_columns(wp, flags);
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	338 }
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	339 else if (di->di_tv.v_type == VAR_LIST
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	340 && di->di_tv.vval.v_list != NULL
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	341 && di->di_tv.vval.v_list->lv_len == 2)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	342 {
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	343 list_T *l = di->di_tv.vval.v_list;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	344
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	345 wp->w_popup_mincol = tv_get_number(&l->lv_first->li_tv);
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	346 wp->w_popup_maxcol = tv_get_number(&l->lv_first->li_next->li_tv);
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	347 }
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	348 else
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	349 semsg(_(e_invarg2), tv_get_string(&di->di_tv));
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	350 }
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	351
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	352 popup_mask_refresh = TRUE;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	353 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	354
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	355 /*
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	356 * 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	357 */
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	358 static void
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	359 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	360 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	361 listitem_T *li;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	362 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	363 char_u *p;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	364
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	365 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	366 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	367 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	368 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	369 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	370 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	371 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	372 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	373
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	374 /*
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	375 * 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	376 */
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	377 static void
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	378 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	379 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	380 listitem_T *li;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	381 listitem_T *pli;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	382 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	383 char_u *p;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	384 dict_T *dict;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	385
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	386 // 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	387 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	388 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	389 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	390 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	391 emsg(_(e_dictreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	392 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	393 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	394 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	395 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	396 : 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	397 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	398 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	399 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	400
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	401 // 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	402 lnum = 1;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	403 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	404 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	405 dictitem_T *di;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	406 list_T *plist;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	407
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	408 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	409 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	410 if (di != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	411 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	412 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	413 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	414 emsg(_(e_listreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	415 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	416 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	417 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	418 if (plist != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	419 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	420 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	421 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	422 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	423 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	424 emsg(_(e_dictreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	425 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	426 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	427 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	428 if (dict != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	429 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	430 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	431
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	432 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	433 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	434 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	435 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	436 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	437 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	438 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	439
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	440 /*
17041 5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	441 * Return the height of popup window "wp", including border and padding.
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	442 */
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	443 int
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	444 popup_height(win_T *wp)
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	445 {
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	446 return wp->w_height
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	447 + wp->w_popup_padding[0] + wp->w_popup_border[0]
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	448 + wp->w_popup_padding[2] + wp->w_popup_border[2];
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	449 }
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	450
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	451 /*
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	452 * Return the width of popup window "wp", including border and padding.
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	453 */
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	454 int
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	455 popup_width(win_T *wp)
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	456 {
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	457 return wp->w_width
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	458 + wp->w_popup_padding[3] + wp->w_popup_border[3]
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	459 + wp->w_popup_padding[1] + wp->w_popup_border[1];
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	460 }
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	461
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 17034 diff changeset	462 /*
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	463 * 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	464 */
16839 032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	465 void
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	466 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	467 {
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	468 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	469 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	470 int maxwidth;
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	471 int center_vert = FALSE;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	472 int center_hor = FALSE;
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	473 int allow_adjust_left = !wp->w_popup_fixed;
16898 16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	474 int top_extra = wp->w_popup_border[0] + wp->w_popup_padding[0];
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	475 int right_extra = wp->w_popup_border[1] + wp->w_popup_padding[1];
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	476 int bot_extra = wp->w_popup_border[2] + wp->w_popup_padding[2];
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	477 int left_extra = wp->w_popup_border[3] + wp->w_popup_padding[3];
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	478 int extra_height = top_extra + bot_extra;
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	479 int extra_width = left_extra + right_extra;
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	480 int org_winrow = wp->w_winrow;
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	481 int org_wincol = wp->w_wincol;
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	482 int org_width = wp->w_width;
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	483 int org_height = wp->w_height;
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	484
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	485 wp->w_winrow = 0;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	486 wp->w_wincol = 0;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	487 if (wp->w_popup_pos == POPPOS_CENTER)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	488 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	489 // center after computing the size
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	490 center_vert = TRUE;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	491 center_hor = TRUE;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	492 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	493 else
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	494 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	495 if (wp->w_wantline == 0)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	496 center_vert = TRUE;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	497 else if (wp->w_popup_pos == POPPOS_TOPLEFT
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	498 \|\| wp->w_popup_pos == POPPOS_TOPRIGHT)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	499 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	500 wp->w_winrow = wp->w_wantline - 1;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	501 if (wp->w_winrow >= Rows)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	502 wp->w_winrow = Rows - 1;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	503 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	504
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	505 if (wp->w_wantcol == 0)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	506 center_hor = TRUE;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	507 else if (wp->w_popup_pos == POPPOS_TOPLEFT
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	508 \|\| wp->w_popup_pos == POPPOS_BOTLEFT)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	509 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	510 wp->w_wincol = wp->w_wantcol - 1;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	511 if (wp->w_wincol >= Columns - 3)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	512 wp->w_wincol = Columns - 3;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	513 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	514 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	515
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	516 // When centering or right aligned, use maximum width.
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	517 // When left aligned use the space available, but shift to the left when we
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	518 // hit the right of the screen.
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	519 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	520 if (wp->w_maxwidth > 0 && maxwidth > wp->w_maxwidth)
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	521 {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	522 allow_adjust_left = FALSE;
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	523 maxwidth = wp->w_maxwidth;
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	524 }
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	525
17047 6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	526 // start at the desired first line
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	527 wp->w_topline = wp->w_firstline;
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	528 if (wp->w_topline > wp->w_buffer->b_ml.ml_line_count)
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	529 wp->w_topline = wp->w_buffer->b_ml.ml_line_count;
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	530
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	531 // 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	532 // 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	533 wp->w_width = 0;
17047 6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	534 for (lnum = wp->w_topline; lnum <= wp->w_buffer->b_ml.ml_line_count; ++lnum)
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	535 {
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	536 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	537
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	538 if (wp->w_p_wrap)
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	539 {
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	540 while (len > maxwidth)
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	541 {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	542 ++wrapped;
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	543 len -= maxwidth;
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	544 wp->w_width = maxwidth;
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	545 }
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	546 }
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	547 else if (len > maxwidth
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	548 && allow_adjust_left
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	549 && (wp->w_popup_pos == POPPOS_TOPLEFT
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	550 \|\| wp->w_popup_pos == POPPOS_BOTLEFT))
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	551 {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	552 // adjust leftwise to fit text on screen
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	553 int shift_by = ( len - maxwidth );
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	554
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	555 if ( shift_by > wp->w_wincol )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	556 {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	557 int truncate_shift = shift_by - wp->w_wincol;
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	558 len -= truncate_shift;
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	559 shift_by -= truncate_shift;
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	560 }
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	561
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	562 wp->w_wincol -= shift_by;
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	563 maxwidth += shift_by;
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	564 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	565 }
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	566 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	567 wp->w_width = len;
17047 6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	568 // do not use the width of lines we're not going to show
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	569 if (wp->w_maxheight > 0 && wp->w_buffer->b_ml.ml_line_count
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	570 - wp->w_topline + 1 + wrapped > wp->w_maxheight)
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	571 break;
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	572 }
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	573
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	574 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	575 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	576 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	577 wp->w_width = maxwidth;
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	578 if (center_hor)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	579 wp->w_wincol = (Columns - wp->w_width) / 2;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	580 else if (wp->w_popup_pos == POPPOS_BOTRIGHT
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	581 \|\| wp->w_popup_pos == POPPOS_TOPRIGHT)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	582 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	583 // Right aligned: move to the right if needed.
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	584 // No truncation, because that would change the height.
16898 16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	585 if (wp->w_width + extra_width < wp->w_wantcol)
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	586 wp->w_wincol = wp->w_wantcol - (wp->w_width + extra_width);
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	587 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	588
17047 6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	589 wp->w_height = wp->w_buffer->b_ml.ml_line_count - wp->w_topline
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	590 + 1 + wrapped;
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	591 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	592 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	593 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	594 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	595 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	596 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	597
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	598 if (center_vert)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	599 wp->w_winrow = (Rows - wp->w_height) / 2;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	600 else if (wp->w_popup_pos == POPPOS_BOTRIGHT
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	601 \|\| wp->w_popup_pos == POPPOS_BOTLEFT)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	602 {
16898 16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	603 if ((wp->w_height + extra_height) <= wp->w_wantline)
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	604 // bottom aligned: may move down
16898 16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	605 wp->w_winrow = wp->w_wantline - (wp->w_height + extra_height);
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	606 else
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	607 // not enough space, make top aligned
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	608 wp->w_winrow = wp->w_wantline + 1;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	609 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	610
16839 032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	611 wp->w_popup_last_changedtick = CHANGEDTICK(wp->w_buffer);
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	612
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	613 // Need to update popup_mask if the position or size changed.
16992 0f2663c087cd patch 8.1.1496: popup window height is not recomputed Bram Moolenaar <Bram@vim.org> parents: 16986 diff changeset	614 // And redraw windows that were behind the popup.
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	615 if (org_winrow != wp->w_winrow
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	616 \|\| org_wincol != wp->w_wincol
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	617 \|\| org_width != wp->w_width
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	618 \|\| org_height != wp->w_height)
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	619 {
17034 d4a7c690c8e6 patch 8.1.1517: when a popup changes all windows are redrawn Bram Moolenaar <Bram@vim.org> parents: 17026 diff changeset	620 redraw_all_later(VALID);
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	621 popup_mask_refresh = TRUE;
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	622 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	623 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	624
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	625 typedef enum
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	626 {
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	627 TYPE_NORMAL,
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	628 TYPE_ATCURSOR,
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	629 TYPE_NOTIFICATION
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	630 } create_type_T;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	631
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	632 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	633 * popup_create({text}, {options})
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	634 * popup_atcursor({text}, {options})
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	635 * When called from f_popup_atcursor() "type" is TYPE_ATCURSOR.
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	636 */
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	637 static void
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	638 popup_create(typval_T argvars, typval_T rettv, create_type_T type)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	639 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	640 win_T *wp;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	641 buf_T *buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	642 dict_T *d;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	643 int nr;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	644
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	645 // Check arguments look OK.
16892 60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	646 if (!(argvars[0].v_type == VAR_STRING && argvars[0].vval.v_string != NULL)
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	647 && !(argvars[0].v_type == VAR_LIST && argvars[0].vval.v_list != NULL))
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	648 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	649 emsg(_(e_listreq));
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	650 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	651 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	652 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	653 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	654 emsg(_(e_dictreq));
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	655 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	656 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	657 d = argvars[1].vval.v_dict;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	658
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	659 // Create the window and buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	660 wp = win_alloc_popup_win();
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	661 if (wp == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	662 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	663 rettv->vval.v_number = wp->w_id;
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	664 wp->w_popup_pos = POPPOS_TOPLEFT;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	665
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	666 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	667 if (buf == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	668 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	669 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	670
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	671 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	672
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	673 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	674 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	675 (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	676 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	677 (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	678 buf->b_p_ul = -1; // no undo
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	679 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	680 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	681 buf->b_locked = TRUE;
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	682 wp->w_p_wrap = TRUE; // 'wrap' is default on
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	683
16851 48c06fcb8be7 patch 8.1.1427: popup window screenshot test fails Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	684 // 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	685 buf->b_p_initialized = TRUE;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	686
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	687 if (dict_find(d, (char_u *)"tab", -1) != NULL)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	688 nr = (int)dict_get_number(d, (char_u *)"tab");
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	689 else if (type == TYPE_NOTIFICATION)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	690 nr = -1; // notifications are global by default
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	691 else
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	692 nr = 0;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	693
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	694 if (nr == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	695 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	696 // 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	697 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	698 curtab->tp_first_popupwin = wp;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	699 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	700 else if (nr < 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	701 {
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	702 win_T *prev = first_popupwin;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	703
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	704 // Global popup: add at the end, so that it gets displayed on top of
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	705 // older ones with the same zindex. Matters for notifications.
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	706 if (first_popupwin == NULL)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	707 first_popupwin = wp;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	708 else
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	709 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	710 while (prev->w_next != NULL)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	711 prev = prev->w_next;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	712 prev->w_next = wp;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	713 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	714 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	715 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	716 // TODO: find tab page "nr"
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	717 emsg("Not implemented yet");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	718
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	719 // Add text to the buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	720 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	721 {
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	722 // just a string
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	723 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	724 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	725 else
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	726 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	727 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	728
16892 60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	729 if (l->lv_len > 0)
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	730 {
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	731 if (l->lv_first->li_tv.v_type == VAR_STRING)
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	732 // list of strings
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	733 add_popup_strings(buf, l);
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	734 else
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	735 // list of dictionaries
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	736 add_popup_dicts(buf, l);
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	737 }
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	738 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	739
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	740 // Delete the line of the empty buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	741 curbuf = buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	742 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	743 curbuf = curwin->w_buffer;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	744
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	745 if (type == TYPE_ATCURSOR)
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	746 {
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	747 wp->w_popup_pos = POPPOS_BOTLEFT;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	748 setcursor_mayforce(TRUE);
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	749 wp->w_wantline = screen_screenrow();
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	750 if (wp->w_wantline == 0) // cursor in first line
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	751 {
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	752 wp->w_wantline = 2;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	753 wp->w_popup_pos = POPPOS_TOPLEFT;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	754 }
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	755 wp->w_wantcol = screen_screencol() + 1;
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	756 set_moved_values(wp);
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	757 set_moved_columns(wp, FIND_STRING);
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	758 }
df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	759
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	760 // set default values
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	761 wp->w_zindex = POPUPWIN_DEFAULT_ZINDEX;
03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	762
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	763 if (type == TYPE_NOTIFICATION)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	764 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	765 win_T twp, nextwin;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	766 int height = buf->b_ml.ml_line_count + 3;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	767 int i;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	768
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	769 // Try to not overlap with another global popup. Guess we need 3
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	770 // more screen lines than buffer lines.
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	771 wp->w_wantline = 1;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	772 for (twp = first_popupwin; twp != NULL; twp = nextwin)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	773 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	774 nextwin = twp->w_next;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	775 if (twp != wp
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	776 && twp->w_zindex == POPUPWIN_NOTIFICATION_ZINDEX
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	777 && twp->w_winrow <= wp->w_wantline - 1 + height
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	778 && twp->w_winrow + popup_height(twp) > wp->w_wantline - 1)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	779 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	780 // move to below this popup and restart the loop to check for
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	781 // overlap with other popups
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	782 wp->w_wantline = twp->w_winrow + popup_height(twp) + 1;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	783 nextwin = first_popupwin;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	784 }
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	785 }
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	786 if (wp->w_wantline + height > Rows)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	787 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	788 // can't avoid overlap, put on top in the hope that message goes
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	789 // away soon.
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	790 wp->w_wantline = 1;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	791 }
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	792
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	793 wp->w_wantcol = 10;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	794 wp->w_zindex = POPUPWIN_NOTIFICATION_ZINDEX;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	795 for (i = 0; i < 4; ++i)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	796 wp->w_popup_border[i] = 1;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	797 wp->w_popup_padding[1] = 1;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	798 wp->w_popup_padding[3] = 1;
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	799 set_string_option_direct_in_win(wp, (char_u *)"wincolor", -1,
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	800 (char_u *)"WarningMsg", OPT_FREE\|OPT_LOCAL, 0);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	801 }
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	802
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	803 // Deal with options.
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	804 apply_options(wp, buf, argvars[1].vval.v_dict);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	805
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	806 if (type == TYPE_NOTIFICATION && wp->w_popup_timer == NULL)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	807 popup_add_timeout(wp, 3000);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	808
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	809 popup_adjust_position(wp);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	810
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	811 wp->w_vsep_width = 0;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	812
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	813 redraw_all_later(NOT_VALID);
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	814 popup_mask_refresh = TRUE;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	815 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	816
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	817 /*
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	818 * popup_clear()
905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	819 */
905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	820 void
905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	821 f_popup_clear(typval_T argvars UNUSED, typval_T rettv UNUSED)
905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	822 {
905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	823 close_all_popups();
905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	824 }
905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	825
905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 16992 diff changeset	826 /*
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	827 * popup_create({text}, {options})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	828 */
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	829 void
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	830 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	831 {
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	832 popup_create(argvars, rettv, TYPE_NORMAL);
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	833 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	834
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	835 /*
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	836 * popup_atcursor({text}, {options})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	837 */
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	838 void
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	839 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	840 {
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	841 popup_create(argvars, rettv, TYPE_ATCURSOR);
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	842 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	843
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	844 /*
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	845 * popup_notification({text}, {options})
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	846 */
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	847 void
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	848 f_popup_notification(typval_T argvars, typval_T rettv)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	849 {
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	850 popup_create(argvars, rettv, TYPE_NOTIFICATION);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	851 }
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	852
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	853 /*
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	854 * 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	855 * 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	856 * 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	857 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	858 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	859 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	860 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	861 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	862
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	863 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	864 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	865 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	866 return NULL;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	867 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	868 return wp;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	869 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	870
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	871 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	872 * 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	873 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	874 int
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	875 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	876 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	877 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	878
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	879 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	880 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	881 return TRUE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	882 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	883 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	884 return TRUE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	885 return FALSE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	886 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	887
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	888 /*
16890 5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	889 * Invoke the close callback for window "wp" with value "result".
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	890 * Careful: The callback may make "wp" invalid!
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	891 */
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	892 static void
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	893 invoke_popup_callback(win_T wp, typval_T result)
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	894 {
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	895 typval_T rettv;
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	896 int dummy;
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	897 typval_T argv[3];
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	898
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	899 argv[0].v_type = VAR_NUMBER;
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	900 argv[0].vval.v_number = (varnumber_T)wp->w_id;
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	901
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	902 if (result != NULL && result->v_type != VAR_UNKNOWN)
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	903 copy_tv(result, &argv[1]);
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	904 else
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	905 {
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	906 argv[1].v_type = VAR_NUMBER;
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	907 argv[1].vval.v_number = 0;
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	908 }
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	909
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	910 argv[2].v_type = VAR_UNKNOWN;
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	911
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	912 call_callback(&wp->w_close_cb, -1,
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	913 &rettv, 2, argv, NULL, 0L, 0L, &dummy, TRUE, NULL);
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	914 if (result != NULL)
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	915 clear_tv(&argv[1]);
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	916 clear_tv(&rettv);
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	917 }
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	918
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	919 /*
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	920 * Close popup "wp" and invoke any close callback for it.
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	921 */
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	922 static void
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	923 popup_close_and_callback(win_T wp, typval_T arg)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	924 {
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	925 int id = wp->w_id;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	926
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	927 if (wp->w_close_cb.cb_name != NULL)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	928 // Careful: This may make "wp" invalid.
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	929 invoke_popup_callback(wp, arg);
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	930
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	931 popup_close(id);
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	932 }
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	933
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	934 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	935 * popup_close({id})
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	936 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	937 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	938 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	939 {
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	940 int id = (int)tv_get_number(argvars);
16890 5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	941 win_T *wp = find_popup_win(id);
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	942
16890 5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	943 if (wp != NULL)
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	944 popup_close_and_callback(wp, &argvars[1]);
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	945 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	946
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	947 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	948 * 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	949 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	950 void
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	951 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	952 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	953 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	954 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	955
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	956 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	957 {
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	958 wp->w_popup_flags \|= POPF_HIDDEN;
16859 0154363d3b98 patch 8.1.1431: popup window listed as "Scratch" Bram Moolenaar <Bram@vim.org> parents: 16857 diff changeset	959 --wp->w_buffer->b_nwindows;
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	960 redraw_all_later(NOT_VALID);
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	961 popup_mask_refresh = TRUE;
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	962 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	963 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	964
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	965 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	966 * 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	967 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	968 void
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	969 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	970 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	971 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	972 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	973
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	974 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	975 {
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	976 wp->w_popup_flags &= ~POPF_HIDDEN;
16859 0154363d3b98 patch 8.1.1431: popup window listed as "Scratch" Bram Moolenaar <Bram@vim.org> parents: 16857 diff changeset	977 ++wp->w_buffer->b_nwindows;
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	978 redraw_all_later(NOT_VALID);
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	979 popup_mask_refresh = TRUE;
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	980 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	981 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	982
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	983 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	984 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	985 {
16833 6699c03347d2 patch 8.1.1418: win_execute() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	986 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	987 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	988 clear_cmdline = TRUE;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	989 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	990 redraw_all_later(NOT_VALID);
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	991 popup_mask_refresh = TRUE;
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	992 }
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	993
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	994 /*
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	995 * Close a popup window by Window-id.
16890 5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	996 * Does not invoke the callback.
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	997 */
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	998 void
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	999 popup_close(int id)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1000 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1001 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	1002 tabpage_T *tp;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1003 win_T *prev = NULL;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1004
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1005 // go through global popups
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1006 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	1007 if (wp->w_id == id)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1008 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1009 if (prev == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1010 first_popupwin = wp->w_next;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1011 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1012 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	1013 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	1014 return;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1015 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1016
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1017 // 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	1018 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	1019 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	1020 }
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1021
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1022 /*
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1023 * 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	1024 */
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1025 void
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1026 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	1027 {
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1028 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	1029 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	1030 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	1031
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1032 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	1033 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	1034 {
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1035 if (prev == NULL)
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1036 *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	1037 else
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1038 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	1039 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	1040 return;
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	1041 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1042 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1043
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1044 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1045 close_all_popups(void)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1046 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1047 while (first_popupwin != NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1048 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	1049 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	1050 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	1051 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1052
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1053 /*
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1054 * popup_move({id}, {options})
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1055 */
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1056 void
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1057 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	1058 {
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1059 dict_T *d;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1060 int nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1061 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	1062 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	1063
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1064 if (wp == NULL)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1065 return; // invalid {id}
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1066
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1067 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	1068 {
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1069 emsg(_(e_dictreq));
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1070 return;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1071 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1072 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	1073
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1074 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	1075 wp->w_minwidth = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1076 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	1077 wp->w_minheight = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1078 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	1079 wp->w_maxwidth = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1080 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	1081 wp->w_maxheight = nr;
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1082 get_pos_options(wp, d);
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1083
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1084 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	1085 clear_cmdline = TRUE;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1086 popup_adjust_position(wp);
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1087 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	1088
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1089 /*
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1090 * popup_getpos({id})
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1091 */
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1092 void
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1093 f_popup_getpos(typval_T argvars, typval_T rettv)
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1094 {
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1095 dict_T *dict;
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1096 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	1097 win_T *wp = find_popup_win(id);
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1098 int top_extra;
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1099 int left_extra;
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1100
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1101 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	1102 {
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1103 if (wp == NULL)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1104 return; // invalid {id}
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1105 top_extra = wp->w_popup_border[0] + wp->w_popup_padding[0];
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1106 left_extra = wp->w_popup_border[3] + wp->w_popup_padding[3];
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1107
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1108 dict = rettv->vval.v_dict;
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1109
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1110 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	1111 dict_add_number(dict, "col", wp->w_wincol + 1);
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	1112 dict_add_number(dict, "width", wp->w_width + left_extra
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	1113 + wp->w_popup_border[1] + wp->w_popup_padding[1]);
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	1114 dict_add_number(dict, "height", wp->w_height + top_extra
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	1115 + wp->w_popup_border[2] + wp->w_popup_padding[2]);
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1116
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1117 dict_add_number(dict, "core_line", wp->w_winrow + 1 + top_extra);
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1118 dict_add_number(dict, "core_col", wp->w_wincol + 1 + left_extra);
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1119 dict_add_number(dict, "core_width", wp->w_width);
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1120 dict_add_number(dict, "core_height", wp->w_height);
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	1121
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1122 dict_add_number(dict, "visible",
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	1123 win_valid(wp) && (wp->w_popup_flags & POPF_HIDDEN) == 0);
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1124 }
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1125 }
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1126
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1127 /*
16986 03f3a9ca2770 patch 8.1.1493: redrawing with popups is slow and causes flicker Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	1128 * popup_getoptions({id})
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1129 */
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1130 void
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1131 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	1132 {
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1133 dict_T *dict;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1134 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	1135 win_T *wp = find_popup_win(id);
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1136 int i;
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1137
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1138 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	1139 {
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1140 if (wp == NULL)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1141 return;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1142
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1143 dict = rettv->vval.v_dict;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1144 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	1145 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	1146 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	1147 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	1148 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	1149 dict_add_number(dict, "maxwidth", wp->w_maxwidth);
17047 6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	1150 dict_add_number(dict, "firstline", wp->w_firstline);
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1151 dict_add_number(dict, "zindex", wp->w_zindex);
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1152 dict_add_number(dict, "fixed", wp->w_popup_fixed);
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1153
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1154 for (i = 0; i < (int)(sizeof(poppos_entries) / sizeof(poppos_entry_T));
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1155 ++i)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1156 if (wp->w_popup_pos == poppos_entries[i].pp_val)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1157 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1158 dict_add_string(dict, "pos",
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1159 (char_u *)poppos_entries[i].pp_name);
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1160 break;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1161 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	1162
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1163 # if defined(FEAT_TIMERS)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	1164 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	1165 ? (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	1166 # endif
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1167 }
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	1168 }
16874 da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1169
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1170 int
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1171 not_in_popup_window()
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1172 {
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1173 if (bt_popup(curwin->w_buffer))
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1174 {
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1175 emsg(_("E994: Not allowed in a popup window"));
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1176 return TRUE;
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1177 }
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1178 return FALSE;
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1179 }
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	1180
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1181 /*
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1182 * Reset all the POPF_HANDLED flags in global popup windows and popup windows
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1183 * in the current tab.
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1184 */
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1185 void
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1186 popup_reset_handled()
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1187 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1188 win_T *wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1189
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1190 for (wp = first_popupwin; wp != NULL; wp = wp->w_next)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1191 wp->w_popup_flags &= ~POPF_HANDLED;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1192 for (wp = curtab->tp_first_popupwin; wp != NULL; wp = wp->w_next)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1193 wp->w_popup_flags &= ~POPF_HANDLED;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1194 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1195
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1196 /*
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1197 * Find the next visible popup where POPF_HANDLED is not set.
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1198 * Must have called popup_reset_handled() first.
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1199 * When "lowest" is TRUE find the popup with the lowest zindex, otherwise the
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1200 * popup with the highest zindex.
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1201 */
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1202 win_T *
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1203 find_next_popup(int lowest)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1204 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1205 win_T *wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1206 win_T *found_wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1207 int found_zindex;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1208
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1209 found_zindex = lowest ? INT_MAX : 0;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1210 found_wp = NULL;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1211 for (wp = first_popupwin; wp != NULL; wp = wp->w_next)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1212 if ((wp->w_popup_flags & (POPF_HANDLED\|POPF_HIDDEN)) == 0
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1213 && (lowest ? wp->w_zindex < found_zindex
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1214 : wp->w_zindex > found_zindex))
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1215 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1216 found_zindex = wp->w_zindex;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1217 found_wp = wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1218 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1219 for (wp = curtab->tp_first_popupwin; wp != NULL; wp = wp->w_next)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1220 if ((wp->w_popup_flags & (POPF_HANDLED\|POPF_HIDDEN)) == 0
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1221 && (lowest ? wp->w_zindex < found_zindex
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1222 : wp->w_zindex > found_zindex))
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1223 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1224 found_zindex = wp->w_zindex;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1225 found_wp = wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1226 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1227
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1228 if (found_wp != NULL)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1229 found_wp->w_popup_flags \|= POPF_HANDLED;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1230 return found_wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1231 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1232
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1233 /*
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1234 * Invoke the filter callback for window "wp" with typed character "c".
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1235 * Uses the global "mod_mask" for modifiers.
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1236 * Returns the return value of the filter.
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1237 * Careful: The filter may make "wp" invalid!
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1238 */
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1239 static int
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1240 invoke_popup_filter(win_T *wp, int c)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1241 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1242 int res;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1243 typval_T rettv;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1244 int dummy;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1245 typval_T argv[3];
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1246 char_u buf[NUMBUFLEN];
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1247
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1248 argv[0].v_type = VAR_NUMBER;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1249 argv[0].vval.v_number = (varnumber_T)wp->w_id;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1250
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1251 // Convert the number to a string, so that the function can use:
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1252 // if a:c == "\<F2>"
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1253 buf[special_to_buf(c, mod_mask, TRUE, buf)] = NUL;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1254 argv[1].v_type = VAR_STRING;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1255 argv[1].vval.v_string = vim_strsave(buf);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1256
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1257 argv[2].v_type = VAR_UNKNOWN;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1258
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1259 call_callback(&wp->w_filter_cb, -1,
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1260 &rettv, 2, argv, NULL, 0L, 0L, &dummy, TRUE, NULL);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1261 res = tv_get_number(&rettv);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1262 vim_free(argv[1].vval.v_string);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1263 clear_tv(&rettv);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1264 return res;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1265 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1266
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1267 /*
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1268 * Called when "c" was typed: invoke popup filter callbacks.
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1269 * Returns TRUE when the character was consumed,
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1270 */
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1271 int
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1272 popup_do_filter(int c)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1273 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1274 int res = FALSE;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1275 win_T *wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1276
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1277 popup_reset_handled();
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1278
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1279 while (!res && (wp = find_next_popup(FALSE)) != NULL)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1280 if (wp->w_filter_cb.cb_name != NULL)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1281 res = invoke_popup_filter(wp, c);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1282
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1283 return res;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1284 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	1285
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1286 /*
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1287 * Called when the cursor moved: check if any popup needs to be closed if the
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1288 * cursor moved far enough.
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1289 */
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1290 void
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1291 popup_check_cursor_pos()
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1292 {
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1293 win_T *wp;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1294 typval_T tv;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1295
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1296 popup_reset_handled();
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1297 while ((wp = find_next_popup(TRUE)) != NULL)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1298 if (wp->w_popup_curwin != NULL
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1299 && (curwin != wp->w_popup_curwin
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1300 \|\| curwin->w_cursor.lnum != wp->w_popup_lnum
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1301 \|\| curwin->w_cursor.col < wp->w_popup_mincol
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1302 \|\| curwin->w_cursor.col > wp->w_popup_maxcol))
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1303 {
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1304 tv.v_type = VAR_NUMBER;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1305 tv.vval.v_number = -1;
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1306 popup_close_and_callback(wp, &tv);
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1307 }
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1308 }
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1309
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1310 #endif // FEAT_TEXT_PROP

Mercurial > vim

annotate src/popupwin.c @ 17048:dcbd3676e9d6