vim: src/popupwin.c annotate

annotate src/popupwin.c @ 16880:998603a243d7 v8.1.1441

patch 8.1.1441: popup window filter not yet implemented commit https://github.com/vim/vim/commit/bf0eff0b724ebf4951f7ca82e6c648451f9f0c01 Author: Bram Moolenaar <Bram@vim.org> Date: Sat Jun 1 17:13:36 2019 +0200 patch 8.1.1441: popup window filter not yet implemented Problem: Popup window filter not yet implemented. Solution: Implement the popup filter.

author	Bram Moolenaar <Bram@vim.org>
date	Sat, 01 Jun 2019 17:15:06 +0200
parents	da5f5836e90c
children	59e4148c0c73

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 /*
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	32 * Get option value for"key", which is "line" or "col".
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	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)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	50 return dict_get_number(dict, key);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	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 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	56 n = strtol((char )s, (char *)&endp, 10);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	57 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	58 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	59 semsg(_(e_invexpr2), val);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	60 return 0;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	61 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	62 }
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 if (STRCMP(key, "line") == 0)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	65 n = screen_screenrow() + 1 + n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	66 else // "col"
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	67 n = screen_screencol() + 1 + n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	68
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	69 if (n < 1)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	70 n = 1;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	71 return n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	72 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	73
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	74 static void
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	75 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	76 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	77 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	78 int nr;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	79
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	80 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	81 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	82 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	83 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	84 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	85 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	86
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	87 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	88 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	89 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	90 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	91 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	92 ++nr)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	93 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	94 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	95 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	96 nr = -1;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	97 break;
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 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	100 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	101 }
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
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	104 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 * 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	106 * popup window "wp".
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	107 * When called from f_popup_atcursor() "atcursor" is TRUE.
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	108 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 static void
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	110 apply_options(win_T wp, buf_T buf UNUSED, dict_T *dict, int atcursor)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	111 {
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	112 int nr;
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	113 char_u *str;
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	114 dictitem_T *di;
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	115
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	116 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	117 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	118 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	119 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	120
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	121 if (atcursor)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	122 {
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	123 wp->w_popup_pos = POPPOS_BOTLEFT;
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	124 setcursor_mayforce(TRUE);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	125 wp->w_wantline = screen_screenrow();
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	126 if (wp->w_wantline == 0) // cursor in first line
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	127 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	128 wp->w_wantline = 2;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	129 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	130 }
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	131 wp->w_wantcol = screen_screencol() + 1;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	132 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	133
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	134 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	135
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	136 wp->w_zindex = dict_get_number(dict, (char_u *)"zindex");
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	137
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	138 #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	139 // 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	140 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	141 if (nr > 0)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	142 {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	143 char_u cbbuf[50];
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	144 char_u *ptr = cbbuf;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	145 typval_T tv;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	146
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	147 vim_snprintf((char *)cbbuf, sizeof(cbbuf),
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	148 "{_ -> popup_close(%d)}", wp->w_id);
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	149 if (get_lambda_tv(&ptr, &tv, TRUE) == OK)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	150 {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	151 wp->w_popup_timer = create_timer(nr, 0);
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	152 wp->w_popup_timer->tr_callback = get_callback(&tv);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	153 clear_tv(&tv);
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	154 }
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	155 }
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	156 #endif
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	157
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	158 // 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	159 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	160 if (str != NULL)
306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	161 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	162 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	163
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	164 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	165 if (di != NULL)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	166 {
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16855 diff changeset	167 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	168 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	169 }
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	170
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	171 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	172 if (di != NULL)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	173 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	174 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	175
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	176 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	177 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	178 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	179 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	180
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	181 /*
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	182 * 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	183 */
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	184 static void
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	185 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	186 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	187 listitem_T *li;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	188 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	189 char_u *p;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	190
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	191 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	192 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	193 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	194 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	195 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	196 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	197 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	198 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	199
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	200 /*
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	201 * 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	202 */
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	203 static void
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	204 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	205 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	206 listitem_T *li;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	207 listitem_T *pli;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	208 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	209 char_u *p;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	210 dict_T *dict;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	211
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	212 // 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	213 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	214 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	215 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	216 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	217 emsg(_(e_dictreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	218 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	219 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	220 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	221 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	222 : 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	223 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	224 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	225 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	226
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	227 // 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	228 lnum = 1;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	229 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	230 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	231 dictitem_T *di;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	232 list_T *plist;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	233
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	234 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	235 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	236 if (di != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	237 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	238 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	239 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	240 emsg(_(e_listreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	241 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	242 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	243 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	244 if (plist != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	245 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	246 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	247 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	248 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	249 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	250 emsg(_(e_dictreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	251 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	252 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	253 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	254 if (dict != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	255 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	256 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	257
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	258 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	259 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	260 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	261 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	262 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	263 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	264 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	265
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	266 /*
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	267 * 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	268 */
16839 032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	269 void
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	270 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	271 {
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	272 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	273 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	274 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	275 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	276 int center_hor = FALSE;
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	277
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	278 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	279 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	280 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	281 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	282 // 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	283 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	284 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	285 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	286 else
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	287 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	288 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	289 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	290 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	291 \|\| 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	292 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	293 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	294 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	295 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	296 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	297
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	298 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	299 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	300 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	301 \|\| 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	302 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	303 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	304 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	305 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	306 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	307 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	308
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	309 // When centering or right aligned, use maximum width.
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	310 // When left aligned use the space available.
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	311 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	312 if (wp->w_maxwidth > 0 && maxwidth > wp->w_maxwidth)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	313 maxwidth = wp->w_maxwidth;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	314
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	315 // 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	316 // 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	317 wp->w_width = 0;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	318 for (lnum = 1; lnum <= wp->w_buffer->b_ml.ml_line_count; ++lnum)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	319 {
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	320 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	321
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	322 while (wp->w_p_wrap && len > maxwidth)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	323 {
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	324 ++wrapped;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	325 len -= maxwidth;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	326 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	327 }
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	328 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	329 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	330 }
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	331
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	332 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	333 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	334 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	335 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	336 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	337 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	338 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	339 \|\| 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	340 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	341 // 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	342 // No truncation, because that would change the height.
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	343 if (wp->w_width < wp->w_wantcol)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	344 wp->w_wincol = wp->w_wantcol - wp->w_width;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	345 }
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	346
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	347 if (wp->w_height <= 1)
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	348 wp->w_height = wp->w_buffer->b_ml.ml_line_count + wrapped;
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	349 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	350 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	351 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	352 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	353 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	354 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	355
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	356 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	357 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	358 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	359 \|\| 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	360 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	361 if (wp->w_height <= wp->w_wantline)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	362 // bottom aligned: may move down
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	363 wp->w_winrow = wp->w_wantline - wp->w_height;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	364 else
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	365 // 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	366 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	367 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	368
16839 032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	369 wp->w_popup_last_changedtick = CHANGEDTICK(wp->w_buffer);
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	370 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	371
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	372 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	373 * popup_create({text}, {options})
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	374 * popup_atcursor({text}, {options})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	375 * When called from f_popup_atcursor() "atcursor" is TRUE.
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	376 */
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	377 static void
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	378 popup_create(typval_T argvars, typval_T rettv, int atcursor)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	380 win_T *wp;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	381 buf_T *buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	382 dict_T *d;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	383 int nr;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	384
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	385 // Check arguments look OK.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	386 if (!(argvars[0].v_type == VAR_STRING
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	387 && argvars[0].vval.v_string != NULL
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	388 && STRLEN(argvars[0].vval.v_string) > 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	389 && !(argvars[0].v_type == VAR_LIST
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	390 && argvars[0].vval.v_list != NULL
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	391 && argvars[0].vval.v_list->lv_len > 0))
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	392 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	393 emsg(_(e_listreq));
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	394 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	395 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	396 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	397 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	398 emsg(_(e_dictreq));
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	399 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	400 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	401 d = argvars[1].vval.v_dict;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	402
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	403 // Create the window and buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	404 wp = win_alloc_popup_win();
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	405 if (wp == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	406 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	407 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	408 wp->w_popup_pos = POPPOS_TOPLEFT;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	409
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	410 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	411 if (buf == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	412 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	413 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	414
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	415 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	416
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	417 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	418 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	419 (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	420 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	421 (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	422 buf->b_p_ul = -1; // no undo
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	423 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	424 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	425 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	426 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	427
16851 48c06fcb8be7 patch 8.1.1427: popup window screenshot test fails Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	428 // 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	429 buf->b_p_initialized = TRUE;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	430
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	431 nr = (int)dict_get_number(d, (char_u *)"tab");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	432 if (nr == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	433 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	434 // 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	435 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	436 curtab->tp_first_popupwin = wp;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	437 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	438 else if (nr < 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	439 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	440 // global popup
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	441 wp->w_next = first_popupwin;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	442 first_popupwin = wp;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	443 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	444 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	445 // TODO: find tab page "nr"
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	446 emsg("Not implemented yet");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	447
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	448 // Add text to the buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	449 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	450 {
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	451 // just a string
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	452 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	453 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	454 else
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	455 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	456 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	457
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	458 if (l->lv_first->li_tv.v_type == VAR_STRING)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	459 // list of strings
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	460 add_popup_strings(buf, l);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	461 else
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	462 // list of dictionaries
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	463 add_popup_dicts(buf, l);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	464 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	465
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	466 // Delete the line of the empty buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	467 curbuf = buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	468 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	469 curbuf = curwin->w_buffer;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	470
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	471 // Deal with options.
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	472 apply_options(wp, buf, argvars[1].vval.v_dict, atcursor);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	473
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	474 // set default values
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	475 if (wp->w_zindex == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	476 wp->w_zindex = 50;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	477
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	478 popup_adjust_position(wp);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	479
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	480 wp->w_vsep_width = 0;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	481
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	482 redraw_all_later(NOT_VALID);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	483 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	484
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	485 /*
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	486 * popup_create({text}, {options})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	487 */
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	488 void
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	489 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	490 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	491 popup_create(argvars, rettv, FALSE);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	492 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	493
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	494 /*
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	495 * popup_atcursor({text}, {options})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	496 */
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	497 void
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	498 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	499 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	500 popup_create(argvars, rettv, TRUE);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	501 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	502
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	503 /*
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	504 * 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	505 * 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	506 * 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	507 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	508 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	509 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	510 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	511 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	512
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	513 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	514 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	515 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	516 return NULL;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	517 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	518 return wp;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	519 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	520
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	521 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	522 * 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	523 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	524 int
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	525 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	526 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	527 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	528
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	529 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	530 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	531 return TRUE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	532 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	533 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	534 return TRUE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	535 return FALSE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	536 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	537
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	538 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	539 * popup_close({id})
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	540 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	541 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	542 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	543 {
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	544 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	545
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	546 popup_close(id);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	547 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	548
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	549 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	550 * 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	551 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	552 void
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	553 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	554 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	555 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	556 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	557
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	558 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	559 {
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	560 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	561 --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	562 redraw_all_later(NOT_VALID);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	563 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	564 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	565
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	566 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	567 * 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	568 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	569 void
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	570 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	571 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	572 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	573 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	574
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	575 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	576 {
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	577 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	578 ++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	579 redraw_all_later(NOT_VALID);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	580 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	581 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	582
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	583 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	584 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	585 {
16833 6699c03347d2 patch 8.1.1418: win_execute() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	586 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	587 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	588 clear_cmdline = TRUE;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	589 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	590 redraw_all_later(NOT_VALID);
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	591 }
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	592
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	593 /*
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	594 * Close a popup window by Window-id.
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	595 */
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	596 void
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	597 popup_close(int id)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	598 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	599 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	600 tabpage_T *tp;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	601 win_T *prev = NULL;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	602
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	603 // go through global popups
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	604 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	605 if (wp->w_id == id)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	606 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	607 if (prev == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	608 first_popupwin = wp->w_next;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	609 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	610 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	611 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	612 return;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	613 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	614
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	615 // 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	616 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	617 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	618 }
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	619
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	620 /*
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	621 * 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	622 */
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	623 void
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	624 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	625 {
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	626 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	627 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	628 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	629
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	630 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	631 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	632 {
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	633 if (prev == NULL)
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	634 *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	635 else
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	636 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	637 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	638 return;
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	639 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	640 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	641
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	642 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	643 close_all_popups(void)
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 while (first_popupwin != NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	646 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	647 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	648 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	649 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	650
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	651 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	652 ex_popupclear(exarg_T *eap UNUSED)
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 close_all_popups();
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	655 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	656
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	657 /*
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	658 * popup_move({id}, {options})
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	659 */
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	660 void
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	661 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	662 {
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	663 dict_T *d;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	664 int nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	665 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	666 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	667
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	668 if (wp == NULL)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	669 return; // invalid {id}
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	670
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	671 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	672 {
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	673 emsg(_(e_dictreq));
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	674 return;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	675 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	676 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	677
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	678 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	679 wp->w_minwidth = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	680 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	681 wp->w_minheight = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	682 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	683 wp->w_maxwidth = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	684 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	685 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	686 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	687
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	688 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	689 clear_cmdline = TRUE;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	690 popup_adjust_position(wp);
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	691 redraw_all_later(NOT_VALID);
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	692 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	693
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	694 /*
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	695 * popup_getpos({id})
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	696 */
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	697 void
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	698 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	699 {
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	700 dict_T *dict;
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	701 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	702 win_T *wp = find_popup_win(id);
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	703
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	704 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	705 {
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	706 if (wp == NULL)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	707 return; // invalid {id}
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	708 dict = rettv->vval.v_dict;
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	709 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	710 dict_add_number(dict, "col", wp->w_wincol + 1);
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	711 dict_add_number(dict, "width", wp->w_width);
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	712 dict_add_number(dict, "height", wp->w_height);
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	713 dict_add_number(dict, "visible",
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	714 (wp->w_popup_flags & POPF_HIDDEN) == 0);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	715 }
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	716 }
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	717
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	718 /*
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	719 * f_popup_getoptions({id})
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	720 */
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	721 void
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	722 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	723 {
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	724 dict_T *dict;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	725 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	726 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	727 int i;
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	728
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	729 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	730 {
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	731 if (wp == NULL)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	732 return;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	733
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	734 dict = rettv->vval.v_dict;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	735 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	736 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	737 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	738 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	739 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	740 dict_add_number(dict, "maxwidth", wp->w_maxwidth);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	741 dict_add_number(dict, "zindex", wp->w_zindex);
16855 19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	742
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	743 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	744 ++i)
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	745 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	746 {
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	747 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	748 (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	749 break;
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	750 }
19162ff4eacd patch 8.1.1429: "pos" option of popup window not supported yet Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	751
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	752 # if defined(FEAT_TIMERS)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	753 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	754 ? (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	755 # endif
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	756 }
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	757 }
16874 da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	758
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	759 int
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	760 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	761 {
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	762 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	763 {
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	764 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	765 return TRUE;
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	766 }
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	767 return FALSE;
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	768 }
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	769
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	770 /*
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	771 * 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	772 * in the current tab.
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	773 */
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	774 void
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	775 popup_reset_handled()
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	776 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	777 win_T *wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	778
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	779 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	780 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	781 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	782 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	783 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	784
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	785 /*
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	786 * 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	787 * 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	788 * 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	789 * 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	790 */
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	791 win_T *
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	792 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	793 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	794 win_T *wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	795 win_T *found_wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	796 int found_zindex;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	797
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	798 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	799 found_wp = NULL;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	800 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	801 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	802 && (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	803 : 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	804 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	805 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	806 found_wp = wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	807 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	808 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	809 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	810 && (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	811 : 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	812 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	813 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	814 found_wp = wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	815 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	816
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	817 if (found_wp != NULL)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	818 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	819 return found_wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	820 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	821
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	822 /*
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	823 * 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	824 * 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	825 * 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	826 * 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	827 */
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	828 static int
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	829 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	830 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	831 int res;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	832 typval_T rettv;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	833 int dummy;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	834 typval_T argv[3];
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	835 char_u buf[NUMBUFLEN];
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	836
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	837 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	838 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	839
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	840 // 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	841 // if a:c == "\<F2>"
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	842 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	843 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	844 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	845
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	846 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	847
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	848 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	849 &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	850 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	851 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	852 clear_tv(&rettv);
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	853 return res;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	854 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	855
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	856 /*
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	857 * 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	858 * 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	859 */
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	860 int
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	861 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	862 {
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	863 int res = FALSE;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	864 win_T *wp;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	865
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	866 popup_reset_handled();
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	867
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	868 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	869 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	870 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	871
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	872 return res;
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	873 }
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	874
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	875 #endif // FEAT_TEXT_PROP

Mercurial > vim

annotate src/popupwin.c @ 16880:998603a243d7 v8.1.1441