Mercurial > vim

annotate src/mouse.c @ 29234:96ff6c230a66 v8.2.5136

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.2.5136: debugger test fails when run with valgrind Commit: https://github.com/vim/vim/commit/e366ed4f2c6fa8cb663f1b9599b39d57ddbd8a2a Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jun 19 20:13:56 2022 +0100 patch 8.2.5136: debugger test fails when run with valgrind Problem: Debugger test fails when run with valgrind. Solution: Wait longer when using valgrind.
author Bram Moolenaar <Bram@vim.org>
date Sun, 19 Jun 2022 21:15:03 +0200
parents 755ab148288b
children 9dce192d1ac2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1 /* vi:set ts=8 sts=4 sw=4 noet:
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3 * VIM - Vi IMproved by Bram Moolenaar
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
4 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
5 * Do ":help uganda" in Vim to read copying and usage conditions.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
6 * Do ":help credits" in Vim to see a list of people who contributed.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
7 * See README.txt for an overview of the Vim source code.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
8 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
9
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
10 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
11 * mouse.c: mouse handling functions
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
12 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
13
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
14 #include "vim.h"
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
15
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
16 /*
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
17 * Horiziontal and vertical steps used when scrolling.
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
18 * When negative scroll by a whole page.
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
19 */
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
20 static long mouse_hor_step = 6;
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
21 static long mouse_vert_step = 3;
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
22
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
23 void
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
24 mouse_set_vert_scroll_step(long step)
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
25 {
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
26 mouse_vert_step = step;
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
27 }
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
28
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
29 void
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
30 mouse_set_hor_scroll_step(long step)
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
31 {
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
32 mouse_hor_step = step;
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
33 }
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
34
18691
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
35 #ifdef CHECK_DOUBLE_CLICK
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
36 /*
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
37 * Return the duration from t1 to t2 in milliseconds.
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
38 */
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
39 static long
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
40 time_diff_ms(struct timeval *t1, struct timeval *t2)
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
41 {
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
42 // This handles wrapping of tv_usec correctly without any special case.
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
43 // Example of 2 pairs (tv_sec, tv_usec) with a duration of 5 ms:
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
44 // t1 = (1, 998000) t2 = (2, 3000) gives:
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
45 // (2 - 1) * 1000 + (3000 - 998000) / 1000 -> 5 ms.
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
46 return (t2->tv_sec - t1->tv_sec) * 1000
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
47 + (t2->tv_usec - t1->tv_usec) / 1000;
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
48 }
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
49 #endif
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
50
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
51 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
52 * Get class of a character for selection: same class means same word.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
53 * 0: blank
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
54 * 1: punctuation groups
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
55 * 2: normal word character
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
56 * >2: multi-byte word character.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
57 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
58 static int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
59 get_mouse_class(char_u *p)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
60 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
61 int c;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
62
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
63 if (has_mbyte && MB_BYTE2LEN(p[0]) > 1)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
64 return mb_get_class(p);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
65
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
66 c = *p;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
67 if (c == ' ' || c == '\t')
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
68 return 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
69
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
70 if (vim_iswordc(c))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
71 return 2;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
72
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
73 // There are a few special cases where we want certain combinations of
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
74 // characters to be considered as a single word. These are things like
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
75 // "->", "/ *", "*=", "+=", "&=", "<=", ">=", "!=" etc. Otherwise, each
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
76 // character is in its own class.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
77 if (c != NUL && vim_strchr((char_u *)"-+*/%<>&|^!=", c) != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
78 return 1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
79 return c;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
80 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
81
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
82 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
83 * Move "pos" back to the start of the word it's in.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
84 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
85 static void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
86 find_start_of_word(pos_T *pos)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
87 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
88 char_u *line;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
89 int cclass;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
90 int col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
91
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
92 line = ml_get(pos->lnum);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
93 cclass = get_mouse_class(line + pos->col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
94
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
95 while (pos->col > 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
96 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
97 col = pos->col - 1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
98 col -= (*mb_head_off)(line, line + col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
99 if (get_mouse_class(line + col) != cclass)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
100 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
101 pos->col = col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
102 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
103 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
104
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
105 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
106 * Move "pos" forward to the end of the word it's in.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
107 * When 'selection' is "exclusive", the position is just after the word.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
108 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
109 static void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
110 find_end_of_word(pos_T *pos)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
111 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
112 char_u *line;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
113 int cclass;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
114 int col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
115
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
116 line = ml_get(pos->lnum);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
117 if (*p_sel == 'e' && pos->col > 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
118 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
119 --pos->col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
120 pos->col -= (*mb_head_off)(line, line + pos->col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
121 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
122 cclass = get_mouse_class(line + pos->col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
123 while (line[pos->col] != NUL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
124 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
125 col = pos->col + (*mb_ptr2len)(line + pos->col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
126 if (get_mouse_class(line + col) != cclass)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
127 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
128 if (*p_sel == 'e')
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
129 pos->col = col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
130 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
131 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
132 pos->col = col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
133 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
134 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
135
18141
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
136 #if defined(FEAT_GUI_MOTIF) || defined(FEAT_GUI_GTK) \
28303
9849df834f1d patch 8.2.4677: the Athena GUI support is outdated
Bram Moolenaar <Bram@vim.org>
parents: 28087
diff changeset
137 || defined(FEAT_GUI_MSWIN) \
21745
35921b7fc07a patch 8.2.1422: the Mac GUI implementation is outdated
Bram Moolenaar <Bram@vim.org>
parents: 21339
diff changeset
138 || defined(FEAT_GUI_PHOTON) \
18141
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
139 || defined(FEAT_TERM_POPUP_MENU)
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
140 # define USE_POPUP_SETPOS
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
141 # define NEED_VCOL2COL
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
142
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
143 /*
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
144 * Translate window coordinates to buffer position without any side effects
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
145 */
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
146 static int
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
147 get_fpos_of_mouse(pos_T *mpos)
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
148 {
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
149 win_T *wp;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
150 int row = mouse_row;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
151 int col = mouse_col;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
152
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
153 if (row < 0 || col < 0) // check if it makes sense
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
154 return IN_UNKNOWN;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
155
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
156 // find the window where the row is in
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
157 wp = mouse_find_win(&row, &col, FAIL_POPUP);
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
158 if (wp == NULL)
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
159 return IN_UNKNOWN;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
160 // winpos and height may change in win_enter()!
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
161 if (row >= wp->w_height) // In (or below) status line
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
162 return IN_STATUS_LINE;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
163 if (col >= wp->w_width) // In vertical separator line
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
164 return IN_SEP_LINE;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
165
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
166 if (wp != curwin)
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
167 return IN_UNKNOWN;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
168
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
169 // compute the position in the buffer line from the posn on the screen
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
170 if (mouse_comp_pos(curwin, &row, &col, &mpos->lnum, NULL))
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
171 return IN_STATUS_LINE; // past bottom
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
172
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
173 mpos->col = vcol2col(wp, mpos->lnum, col);
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
174
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
175 if (mpos->col > 0)
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
176 --mpos->col;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
177 mpos->coladd = 0;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
178 return IN_BUFFER;
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
179 }
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
180 #endif
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
181
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
182 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
183 * Do the appropriate action for the current mouse click in the current mode.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
184 * Not used for Command-line mode.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
185 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
186 * Normal and Visual Mode:
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
187 * event modi- position visual change action
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
188 * fier cursor window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
189 * left press - yes end yes
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
190 * left press C yes end yes "^]" (2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
191 * left press S yes end (popup: extend) yes "*" (2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
192 * left drag - yes start if moved no
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
193 * left relse - yes start if moved no
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
194 * middle press - yes if not active no put register
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
195 * middle press - yes if active no yank and put
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
196 * right press - yes start or extend yes
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
197 * right press S yes no change yes "#" (2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
198 * right drag - yes extend no
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
199 * right relse - yes extend no
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
200 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
201 * Insert or Replace Mode:
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
202 * event modi- position visual change action
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
203 * fier cursor window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
204 * left press - yes (cannot be active) yes
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
205 * left press C yes (cannot be active) yes "CTRL-O^]" (2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
206 * left press S yes (cannot be active) yes "CTRL-O*" (2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
207 * left drag - yes start or extend (1) no CTRL-O (1)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
208 * left relse - yes start or extend (1) no CTRL-O (1)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
209 * middle press - no (cannot be active) no put register
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
210 * right press - yes start or extend yes CTRL-O
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
211 * right press S yes (cannot be active) yes "CTRL-O#" (2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
212 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
213 * (1) only if mouse pointer moved since press
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
214 * (2) only if click is in same buffer
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
215 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
216 * Return TRUE if start_arrow() should be called for edit mode.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
217 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
218 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
219 do_mouse(
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
220 oparg_T *oap, // operator argument, can be NULL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
221 int c, // K_LEFTMOUSE, etc
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
222 int dir, // Direction to 'put' if necessary
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
223 long count,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
224 int fixindent) // PUT_FIXINDENT if fixing indent necessary
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
225 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
226 static int do_always = FALSE; // ignore 'mouse' setting next time
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
227 static int got_click = FALSE; // got a click some time back
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
228
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
229 int which_button; // MOUSE_LEFT, _MIDDLE or _RIGHT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
230 int is_click = FALSE; // If FALSE it's a drag or release event
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
231 int is_drag = FALSE; // If TRUE it's a drag event
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
232 int jump_flags = 0; // flags for jump_to_mouse()
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
233 pos_T start_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
234 int moved; // Has cursor moved?
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
235 int in_status_line; // mouse in status line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
236 static int in_tab_line = FALSE; // mouse clicked in tab line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
237 int in_sep_line; // mouse in vertical separator line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
238 int c1, c2;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
239 #if defined(FEAT_FOLDING)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
240 pos_T save_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
241 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
242 win_T *old_curwin = curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
243 static pos_T orig_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
244 colnr_T leftcol, rightcol;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
245 pos_T end_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
246 int diff;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
247 int old_active = VIsual_active;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
248 int old_mode = VIsual_mode;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
249 int regname;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
250
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
251 #if defined(FEAT_FOLDING)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
252 save_cursor = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
253 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
254
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
255 // When GUI is active, always recognize mouse events, otherwise:
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
256 // - Ignore mouse event in normal mode if 'mouse' doesn't include 'n'.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
257 // - Ignore mouse event in visual mode if 'mouse' doesn't include 'v'.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
258 // - For command line and insert mode 'mouse' is checked before calling
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
259 // do_mouse().
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
260 if (do_always)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
261 do_always = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
262 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
263 #ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
264 if (!gui.in_use)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
265 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
266 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
267 if (VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
268 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
269 if (!mouse_has(MOUSE_VISUAL))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
270 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
271 }
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
272 else if (State == MODE_NORMAL && !mouse_has(MOUSE_NORMAL))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
273 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
274 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
275
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
276 for (;;)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
277 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
278 which_button = get_mouse_button(KEY2TERMCAP1(c), &is_click, &is_drag);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
279 if (is_drag)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
280 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
281 // If the next character is the same mouse event then use that
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
282 // one. Speeds up dragging the status line.
28333
04310f81143d patch 8.2.4692: no test for what 8.2.4691 fixes
Bram Moolenaar <Bram@vim.org>
parents: 28303
diff changeset
283 // Note: Since characters added to the stuff buffer in the code
04310f81143d patch 8.2.4692: no test for what 8.2.4691 fixes
Bram Moolenaar <Bram@vim.org>
parents: 28303
diff changeset
284 // below need to come before the next character, do not do this
04310f81143d patch 8.2.4692: no test for what 8.2.4691 fixes
Bram Moolenaar <Bram@vim.org>
parents: 28303
diff changeset
285 // when the current character was stuffed.
04310f81143d patch 8.2.4692: no test for what 8.2.4691 fixes
Bram Moolenaar <Bram@vim.org>
parents: 28303
diff changeset
286 if (!KeyStuffed && vpeekc() != NUL)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
287 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
288 int nc;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
289 int save_mouse_row = mouse_row;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
290 int save_mouse_col = mouse_col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
291
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
292 // Need to get the character, peeking doesn't get the actual
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
293 // one.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
294 nc = safe_vgetc();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
295 if (c == nc)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
296 continue;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
297 vungetc(nc);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
298 mouse_row = save_mouse_row;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
299 mouse_col = save_mouse_col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
300 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
301 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
302 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
303 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
304
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
305 if (c == K_MOUSEMOVE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
306 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
307 // Mouse moved without a button pressed.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
308 #ifdef FEAT_BEVAL_TERM
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
309 ui_may_remove_balloon();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
310 if (p_bevalterm)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
311 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
312 profile_setlimit(p_bdlay, &bevalexpr_due);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
313 bevalexpr_due_set = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
314 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
315 #endif
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
316 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
317 popup_handle_mouse_moved();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
318 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
319 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
320 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
321
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
322 #ifdef FEAT_MOUSESHAPE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
323 // May have stopped dragging the status or separator line. The pointer is
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
324 // most likely still on the status or separator line.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
325 if (!is_drag && drag_status_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
326 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
327 drag_status_line = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
328 update_mouseshape(SHAPE_IDX_STATUS);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
329 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
330 if (!is_drag && drag_sep_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
331 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
332 drag_sep_line = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
333 update_mouseshape(SHAPE_IDX_VSEP);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
334 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
335 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
336
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
337 // Ignore drag and release events if we didn't get a click.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
338 if (is_click)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
339 got_click = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
340 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
341 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
342 if (!got_click) // didn't get click, ignore
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
343 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
344 if (!is_drag) // release, reset got_click
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
345 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
346 got_click = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
347 if (in_tab_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
348 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
349 in_tab_line = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
350 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
351 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
352 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
353 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
354
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
355 // CTRL right mouse button does CTRL-T
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
356 if (is_click && (mod_mask & MOD_MASK_CTRL) && which_button == MOUSE_RIGHT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
357 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
358 if (State & MODE_INSERT)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
359 stuffcharReadbuff(Ctrl_O);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
360 if (count > 1)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
361 stuffnumReadbuff(count);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
362 stuffcharReadbuff(Ctrl_T);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
363 got_click = FALSE; // ignore drag&release now
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
364 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
365 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
366
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
367 // CTRL only works with left mouse button
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
368 if ((mod_mask & MOD_MASK_CTRL) && which_button != MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
369 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
370
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
371 // When a modifier is down, ignore drag and release events, as well as
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
372 // multiple clicks and the middle mouse button.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
373 // Accept shift-leftmouse drags when 'mousemodel' is "popup.*".
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
374 if ((mod_mask & (MOD_MASK_SHIFT | MOD_MASK_CTRL | MOD_MASK_ALT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
375 | MOD_MASK_META))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
376 && (!is_click
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
377 || (mod_mask & MOD_MASK_MULTI_CLICK)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
378 || which_button == MOUSE_MIDDLE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
379 && !((mod_mask & (MOD_MASK_SHIFT|MOD_MASK_ALT))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
380 && mouse_model_popup()
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
381 && which_button == MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
382 && !((mod_mask & MOD_MASK_ALT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
383 && !mouse_model_popup()
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
384 && which_button == MOUSE_RIGHT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
385 )
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
386 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
387
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
388 // If the button press was used as the movement command for an operator
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
389 // (eg "d<MOUSE>"), or it is the middle button that is held down, ignore
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
390 // drag/release events.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
391 if (!is_click && which_button == MOUSE_MIDDLE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
392 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
393
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
394 if (oap != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
395 regname = oap->regname;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
396 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
397 regname = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
398
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
399 // Middle mouse button does a 'put' of the selected text
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
400 if (which_button == MOUSE_MIDDLE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
401 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
402 if (State == MODE_NORMAL)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
403 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
404 // If an operator was pending, we don't know what the user wanted
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
405 // to do. Go back to normal mode: Clear the operator and beep().
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
406 if (oap != NULL && oap->op_type != OP_NOP)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
407 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
408 clearopbeep(oap);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
409 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
410 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
411
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
412 // If visual was active, yank the highlighted text and put it
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
413 // before the mouse pointer position.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
414 // In Select mode replace the highlighted text with the clipboard.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
415 if (VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
416 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
417 if (VIsual_select)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
418 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
419 stuffcharReadbuff(Ctrl_G);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
420 stuffReadbuff((char_u *)"\"+p");
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
421 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
422 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
423 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
424 stuffcharReadbuff('y');
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
425 stuffcharReadbuff(K_MIDDLEMOUSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
426 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
427 do_always = TRUE; // ignore 'mouse' setting next time
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
428 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
429 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
430 // The rest is below jump_to_mouse()
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
431 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
432
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
433 else if ((State & MODE_INSERT) == 0)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
434 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
435
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
436 // Middle click in insert mode doesn't move the mouse, just insert the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
437 // contents of a register. '.' register is special, can't insert that
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
438 // with do_put().
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
439 // Also paste at the cursor if the current mode isn't in 'mouse' (only
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
440 // happens for the GUI).
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
441 if ((State & MODE_INSERT) || !mouse_has(MOUSE_NORMAL))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
442 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
443 if (regname == '.')
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
444 insert_reg(regname, TRUE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
445 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
446 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
447 #ifdef FEAT_CLIPBOARD
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
448 if (clip_star.available && regname == 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
449 regname = '*';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
450 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
451 if ((State & REPLACE_FLAG) && !yank_register_mline(regname))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
452 insert_reg(regname, TRUE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
453 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
454 {
22176
6941d3205be9 patch 8.2.1637: Vim9: :put ={expr} does not work inside :def function
Bram Moolenaar <Bram@vim.org>
parents: 21745
diff changeset
455 do_put(regname, NULL, BACKWARD, 1L,
6941d3205be9 patch 8.2.1637: Vim9: :put ={expr} does not work inside :def function
Bram Moolenaar <Bram@vim.org>
parents: 21745
diff changeset
456 fixindent | PUT_CURSEND);
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
457
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
458 // Repeat it with CTRL-R CTRL-O r or CTRL-R CTRL-P r
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
459 AppendCharToRedobuff(Ctrl_R);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
460 AppendCharToRedobuff(fixindent ? Ctrl_P : Ctrl_O);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
461 AppendCharToRedobuff(regname == 0 ? '"' : regname);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
462 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
463 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
464 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
465 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
466 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
467
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
468 // When dragging or button-up stay in the same window.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
469 if (!is_click)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
470 jump_flags |= MOUSE_FOCUS | MOUSE_DID_MOVE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
471
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
472 start_visual.lnum = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
473
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
474 // Check for clicking in the tab page line.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
475 if (mouse_row == 0 && firstwin->w_winrow > 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
476 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
477 if (is_drag)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
478 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
479 if (in_tab_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
480 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
481 c1 = TabPageIdxs[mouse_col];
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
482 tabpage_move(c1 <= 0 ? 9999 : c1 < tabpage_index(curtab)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
483 ? c1 - 1 : c1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
484 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
485 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
486 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
487
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
488 // click in a tab selects that tab page
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
489 if (is_click
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
490 # ifdef FEAT_CMDWIN
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
491 && cmdwin_type == 0
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
492 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
493 && mouse_col < Columns)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
494 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
495 in_tab_line = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
496 c1 = TabPageIdxs[mouse_col];
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
497 if (c1 >= 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
498 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
499 if ((mod_mask & MOD_MASK_MULTI_CLICK) == MOD_MASK_2CLICK)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
500 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
501 // double click opens new page
24788
b36ceac30454 patch 8.2.2932: select mode test fails
Bram Moolenaar <Bram@vim.org>
parents: 24784
diff changeset
502 end_visual_mode_keep_button();
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
503 tabpage_new();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
504 tabpage_move(c1 == 0 ? 9999 : c1 - 1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
505 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
506 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
507 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
508 // Go to specified tab page, or next one if not clicking
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
509 // on a label.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
510 goto_tabpage(c1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
511
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
512 // It's like clicking on the status line of a window.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
513 if (curwin != old_curwin)
24788
b36ceac30454 patch 8.2.2932: select mode test fails
Bram Moolenaar <Bram@vim.org>
parents: 24784
diff changeset
514 end_visual_mode_keep_button();
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
515 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
516 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
517 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
518 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
519 tabpage_T *tp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
520
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
521 // Close the current or specified tab page.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
522 if (c1 == -999)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
523 tp = curtab;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
524 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
525 tp = find_tabpage(-c1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
526 if (tp == curtab)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
527 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
528 if (first_tabpage->tp_next != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
529 tabpage_close(FALSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
530 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
531 else if (tp != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
532 tabpage_close_other(tp, FALSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
533 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
534 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
535 return TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
536 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
537 else if (is_drag && in_tab_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
538 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
539 c1 = TabPageIdxs[mouse_col];
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
540 tabpage_move(c1 <= 0 ? 9999 : c1 - 1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
541 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
542 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
543
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
544 // When 'mousemodel' is "popup" or "popup_setpos", translate mouse events:
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
545 // right button up -> pop-up menu
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
546 // shift-left button -> right button
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
547 // alt-left button -> alt-right button
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
548 if (mouse_model_popup())
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
549 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
550 if (which_button == MOUSE_RIGHT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
551 && !(mod_mask & (MOD_MASK_SHIFT | MOD_MASK_CTRL)))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
552 {
18141
2cc67e54edf8 patch 8.1.2065: compiler warning building non-GUI with MinGW.
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
553 #ifdef USE_POPUP_SETPOS
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
554 # ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
555 if (gui.in_use)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
556 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
557 # if defined(FEAT_GUI_MOTIF) || defined(FEAT_GUI_GTK) \
21745
35921b7fc07a patch 8.2.1422: the Mac GUI implementation is outdated
Bram Moolenaar <Bram@vim.org>
parents: 21339
diff changeset
558 || defined(FEAT_GUI_PHOTON)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
559 if (!is_click)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
560 // Ignore right button release events, only shows the popup
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
561 // menu on the button down event.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
562 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
563 # endif
28303
9849df834f1d patch 8.2.4677: the Athena GUI support is outdated
Bram Moolenaar <Bram@vim.org>
parents: 28087
diff changeset
564 # if defined(FEAT_GUI_MSWIN) || defined(FEAT_GUI_HAIKU)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
565 if (is_click || is_drag)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
566 // Ignore right button down and drag mouse events. Windows
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
567 // only shows the popup menu on the button up event.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
568 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
569 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
570 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
571 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
572 # if defined(FEAT_GUI) && defined(FEAT_TERM_POPUP_MENU)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
573 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
574 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
575 # if defined(FEAT_TERM_POPUP_MENU)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
576 if (!is_click)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
577 // Ignore right button release events, only shows the popup
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
578 // menu on the button down event.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
579 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
580 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
581
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
582 jump_flags = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
583 if (STRCMP(p_mousem, "popup_setpos") == 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
584 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
585 // First set the cursor position before showing the popup
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
586 // menu.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
587 if (VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
588 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
589 pos_T m_pos;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
590
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
591 // set MOUSE_MAY_STOP_VIS if we are outside the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
592 // selection or the current window (might have false
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
593 // negative here)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
594 if (mouse_row < curwin->w_winrow
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
595 || mouse_row
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
596 > (curwin->w_winrow + curwin->w_height))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
597 jump_flags = MOUSE_MAY_STOP_VIS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
598 else if (get_fpos_of_mouse(&m_pos) != IN_BUFFER)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
599 jump_flags = MOUSE_MAY_STOP_VIS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
600 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
601 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
602 if ((LT_POS(curwin->w_cursor, VIsual)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
603 && (LT_POS(m_pos, curwin->w_cursor)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
604 || LT_POS(VIsual, m_pos)))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
605 || (LT_POS(VIsual, curwin->w_cursor)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
606 && (LT_POS(m_pos, VIsual)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
607 || LT_POS(curwin->w_cursor, m_pos))))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
608 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
609 jump_flags = MOUSE_MAY_STOP_VIS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
610 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
611 else if (VIsual_mode == Ctrl_V)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
612 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
613 getvcols(curwin, &curwin->w_cursor, &VIsual,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
614 &leftcol, &rightcol);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
615 getvcol(curwin, &m_pos, NULL, &m_pos.col, NULL);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
616 if (m_pos.col < leftcol || m_pos.col > rightcol)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
617 jump_flags = MOUSE_MAY_STOP_VIS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
618 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
619 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
620 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
621 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
622 jump_flags = MOUSE_MAY_STOP_VIS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
623 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
624 if (jump_flags)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
625 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
626 jump_flags = jump_to_mouse(jump_flags, NULL, which_button);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
627 update_curbuf(VIsual_active ? INVERTED : VALID);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
628 setcursor();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
629 out_flush(); // Update before showing popup menu
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
630 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
631 # ifdef FEAT_MENU
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
632 show_popupmenu();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
633 got_click = FALSE; // ignore release events
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
634 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
635 return (jump_flags & CURSOR_MOVED) != 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
636 #else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
637 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
638 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
639 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
640 if (which_button == MOUSE_LEFT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
641 && (mod_mask & (MOD_MASK_SHIFT|MOD_MASK_ALT)))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
642 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
643 which_button = MOUSE_RIGHT;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
644 mod_mask &= ~MOD_MASK_SHIFT;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
645 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
646 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
647
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
648 if ((State & (MODE_NORMAL | MODE_INSERT))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
649 && !(mod_mask & (MOD_MASK_SHIFT | MOD_MASK_CTRL)))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
650 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
651 if (which_button == MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
652 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
653 if (is_click)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
654 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
655 // stop Visual mode for a left click in a window, but not when
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
656 // on a status line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
657 if (VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
658 jump_flags |= MOUSE_MAY_STOP_VIS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
659 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
660 else if (mouse_has(MOUSE_VISUAL))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
661 jump_flags |= MOUSE_MAY_VIS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
662 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
663 else if (which_button == MOUSE_RIGHT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
664 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
665 if (is_click && VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
666 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
667 // Remember the start and end of visual before moving the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
668 // cursor.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
669 if (LT_POS(curwin->w_cursor, VIsual))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
670 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
671 start_visual = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
672 end_visual = VIsual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
673 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
674 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
675 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
676 start_visual = VIsual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
677 end_visual = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
678 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
679 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
680 jump_flags |= MOUSE_FOCUS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
681 if (mouse_has(MOUSE_VISUAL))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
682 jump_flags |= MOUSE_MAY_VIS;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
683 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
684 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
685
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
686 // If an operator is pending, ignore all drags and releases until the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
687 // next mouse click.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
688 if (!is_drag && oap != NULL && oap->op_type != OP_NOP)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
689 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
690 got_click = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
691 oap->motion_type = MCHAR;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
692 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
693
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
694 // When releasing the button let jump_to_mouse() know.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
695 if (!is_click && !is_drag)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
696 jump_flags |= MOUSE_RELEASED;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
697
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
698 // JUMP!
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
699 jump_flags = jump_to_mouse(jump_flags,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
700 oap == NULL ? NULL : &(oap->inclusive), which_button);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
701
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
702 #ifdef FEAT_MENU
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
703 // A click in the window toolbar has no side effects.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
704 if (jump_flags & MOUSE_WINBAR)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
705 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
706 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
707 moved = (jump_flags & CURSOR_MOVED);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
708 in_status_line = (jump_flags & IN_STATUS_LINE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
709 in_sep_line = (jump_flags & IN_SEP_LINE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
710
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
711 #ifdef FEAT_NETBEANS_INTG
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
712 if (isNetbeansBuffer(curbuf)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
713 && !(jump_flags & (IN_STATUS_LINE | IN_SEP_LINE)))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
714 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
715 int key = KEY2TERMCAP1(c);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
716
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
717 if (key == (int)KE_LEFTRELEASE || key == (int)KE_MIDDLERELEASE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
718 || key == (int)KE_RIGHTRELEASE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
719 netbeans_button_release(which_button);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
720 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
721 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
722
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
723 // When jumping to another window, clear a pending operator. That's a bit
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
724 // friendlier than beeping and not jumping to that window.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
725 if (curwin != old_curwin && oap != NULL && oap->op_type != OP_NOP)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
726 clearop(oap);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
727
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
728 #ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
729 if (mod_mask == 0
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
730 && !is_drag
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
731 && (jump_flags & (MOUSE_FOLD_CLOSE | MOUSE_FOLD_OPEN))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
732 && which_button == MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
733 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
734 // open or close a fold at this line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
735 if (jump_flags & MOUSE_FOLD_OPEN)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
736 openFold(curwin->w_cursor.lnum, 1L);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
737 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
738 closeFold(curwin->w_cursor.lnum, 1L);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
739 // don't move the cursor if still in the same window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
740 if (curwin == old_curwin)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
741 curwin->w_cursor = save_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
742 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
743 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
744
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
745 #if defined(FEAT_CLIPBOARD) && defined(FEAT_CMDWIN)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
746 if ((jump_flags & IN_OTHER_WIN) && !VIsual_active && clip_star.available)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
747 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
748 clip_modeless(which_button, is_click, is_drag);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
749 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
750 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
751 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
752
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
753 // Set global flag that we are extending the Visual area with mouse
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
754 // dragging; temporarily minimize 'scrolloff'.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
755 if (VIsual_active && is_drag && get_scrolloff_value())
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
756 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
757 // In the very first line, allow scrolling one line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
758 if (mouse_row == 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
759 mouse_dragging = 2;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
760 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
761 mouse_dragging = 1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
762 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
763
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
764 // When dragging the mouse above the window, scroll down.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
765 if (is_drag && mouse_row < 0 && !in_status_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
766 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
767 scroll_redraw(FALSE, 1L);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
768 mouse_row = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
769 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
770
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
771 if (start_visual.lnum) // right click in visual mode
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
772 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
773 // When ALT is pressed make Visual mode blockwise.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
774 if (mod_mask & MOD_MASK_ALT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
775 VIsual_mode = Ctrl_V;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
776
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
777 // In Visual-block mode, divide the area in four, pick up the corner
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
778 // that is in the quarter that the cursor is in.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
779 if (VIsual_mode == Ctrl_V)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
780 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
781 getvcols(curwin, &start_visual, &end_visual, &leftcol, &rightcol);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
782 if (curwin->w_curswant > (leftcol + rightcol) / 2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
783 end_visual.col = leftcol;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
784 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
785 end_visual.col = rightcol;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
786 if (curwin->w_cursor.lnum >=
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
787 (start_visual.lnum + end_visual.lnum) / 2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
788 end_visual.lnum = start_visual.lnum;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
789
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
790 // move VIsual to the right column
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
791 start_visual = curwin->w_cursor; // save the cursor pos
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
792 curwin->w_cursor = end_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
793 coladvance(end_visual.col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
794 VIsual = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
795 curwin->w_cursor = start_visual; // restore the cursor
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
796 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
797 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
798 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
799 // If the click is before the start of visual, change the start.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
800 // If the click is after the end of visual, change the end. If
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
801 // the click is inside the visual, change the closest side.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
802 if (LT_POS(curwin->w_cursor, start_visual))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
803 VIsual = end_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
804 else if (LT_POS(end_visual, curwin->w_cursor))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
805 VIsual = start_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
806 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
807 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
808 // In the same line, compare column number
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
809 if (end_visual.lnum == start_visual.lnum)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
810 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
811 if (curwin->w_cursor.col - start_visual.col >
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
812 end_visual.col - curwin->w_cursor.col)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
813 VIsual = start_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
814 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
815 VIsual = end_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
816 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
817
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
818 // In different lines, compare line number
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
819 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
820 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
821 diff = (curwin->w_cursor.lnum - start_visual.lnum) -
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
822 (end_visual.lnum - curwin->w_cursor.lnum);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
823
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
824 if (diff > 0) // closest to end
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
825 VIsual = start_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
826 else if (diff < 0) // closest to start
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
827 VIsual = end_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
828 else // in the middle line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
829 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
830 if (curwin->w_cursor.col <
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
831 (start_visual.col + end_visual.col) / 2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
832 VIsual = end_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
833 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
834 VIsual = start_visual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
835 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
836 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
837 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
838 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
839 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
840 // If Visual mode started in insert mode, execute "CTRL-O"
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
841 else if ((State & MODE_INSERT) && VIsual_active)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
842 stuffcharReadbuff(Ctrl_O);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
843
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
844 // Middle mouse click: Put text before cursor.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
845 if (which_button == MOUSE_MIDDLE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
846 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
847 #ifdef FEAT_CLIPBOARD
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
848 if (clip_star.available && regname == 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
849 regname = '*';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
850 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
851 if (yank_register_mline(regname))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
852 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
853 if (mouse_past_bottom)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
854 dir = FORWARD;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
855 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
856 else if (mouse_past_eol)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
857 dir = FORWARD;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
858
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
859 if (fixindent)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
860 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
861 c1 = (dir == BACKWARD) ? '[' : ']';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
862 c2 = 'p';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
863 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
864 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
865 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
866 c1 = (dir == FORWARD) ? 'p' : 'P';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
867 c2 = NUL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
868 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
869 prep_redo(regname, count, NUL, c1, NUL, c2, NUL);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
870
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
871 // Remember where the paste started, so in edit() Insstart can be set
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
872 // to this position
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
873 if (restart_edit != 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
874 where_paste_started = curwin->w_cursor;
22176
6941d3205be9 patch 8.2.1637: Vim9: :put ={expr} does not work inside :def function
Bram Moolenaar <Bram@vim.org>
parents: 21745
diff changeset
875 do_put(regname, NULL, dir, count, fixindent | PUT_CURSEND);
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
876 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
877
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
878 #if defined(FEAT_QUICKFIX)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
879 // Ctrl-Mouse click or double click in a quickfix window jumps to the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
880 // error under the mouse pointer.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
881 else if (((mod_mask & MOD_MASK_CTRL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
882 || (mod_mask & MOD_MASK_MULTI_CLICK) == MOD_MASK_2CLICK)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
883 && bt_quickfix(curbuf))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
884 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
885 if (curwin->w_llist_ref == NULL) // quickfix window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
886 do_cmdline_cmd((char_u *)".cc");
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
887 else // location list window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
888 do_cmdline_cmd((char_u *)".ll");
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
889 got_click = FALSE; // ignore drag&release now
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
890 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
891 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
892
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
893 // Ctrl-Mouse click (or double click in a help window) jumps to the tag
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
894 // under the mouse pointer.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
895 else if ((mod_mask & MOD_MASK_CTRL) || (curbuf->b_help
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
896 && (mod_mask & MOD_MASK_MULTI_CLICK) == MOD_MASK_2CLICK))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
897 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
898 if (State & MODE_INSERT)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
899 stuffcharReadbuff(Ctrl_O);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
900 stuffcharReadbuff(Ctrl_RSB);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
901 got_click = FALSE; // ignore drag&release now
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
902 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
903
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
904 // Shift-Mouse click searches for the next occurrence of the word under
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
905 // the mouse pointer
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
906 else if ((mod_mask & MOD_MASK_SHIFT))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
907 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
908 if ((State & MODE_INSERT) || (VIsual_active && VIsual_select))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
909 stuffcharReadbuff(Ctrl_O);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
910 if (which_button == MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
911 stuffcharReadbuff('*');
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
912 else // MOUSE_RIGHT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
913 stuffcharReadbuff('#');
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
914 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
915
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
916 // Handle double clicks, unless on status line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
917 else if (in_status_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
918 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
919 #ifdef FEAT_MOUSESHAPE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
920 if ((is_drag || is_click) && !drag_status_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
921 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
922 drag_status_line = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
923 update_mouseshape(-1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
924 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
925 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
926 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
927 else if (in_sep_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
928 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
929 #ifdef FEAT_MOUSESHAPE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
930 if ((is_drag || is_click) && !drag_sep_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
931 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
932 drag_sep_line = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
933 update_mouseshape(-1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
934 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
935 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
936 }
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
937 else if ((mod_mask & MOD_MASK_MULTI_CLICK)
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
938 && (State & (MODE_NORMAL | MODE_INSERT))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
939 && mouse_has(MOUSE_VISUAL))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
940 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
941 if (is_click || !VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
942 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
943 if (VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
944 orig_cursor = VIsual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
945 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
946 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
947 check_visual_highlight();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
948 VIsual = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
949 orig_cursor = VIsual;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
950 VIsual_active = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
951 VIsual_reselect = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
952 // start Select mode if 'selectmode' contains "mouse"
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
953 may_start_select('o');
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
954 setmouse();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
955 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
956 if ((mod_mask & MOD_MASK_MULTI_CLICK) == MOD_MASK_2CLICK)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
957 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
958 // Double click with ALT pressed makes it blockwise.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
959 if (mod_mask & MOD_MASK_ALT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
960 VIsual_mode = Ctrl_V;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
961 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
962 VIsual_mode = 'v';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
963 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
964 else if ((mod_mask & MOD_MASK_MULTI_CLICK) == MOD_MASK_3CLICK)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
965 VIsual_mode = 'V';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
966 else if ((mod_mask & MOD_MASK_MULTI_CLICK) == MOD_MASK_4CLICK)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
967 VIsual_mode = Ctrl_V;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
968 #ifdef FEAT_CLIPBOARD
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
969 // Make sure the clipboard gets updated. Needed because start and
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
970 // end may still be the same, and the selection needs to be owned
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
971 clip_star.vmode = NUL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
972 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
973 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
974 // A double click selects a word or a block.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
975 if ((mod_mask & MOD_MASK_MULTI_CLICK) == MOD_MASK_2CLICK)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
976 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
977 pos_T *pos = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
978 int gc;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
979
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
980 if (is_click)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
981 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
982 // If the character under the cursor (skipping white space) is
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
983 // not a word character, try finding a match and select a (),
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
984 // {}, [], #if/#endif, etc. block.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
985 end_visual = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
986 while (gc = gchar_pos(&end_visual), VIM_ISWHITE(gc))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
987 inc(&end_visual);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
988 if (oap != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
989 oap->motion_type = MCHAR;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
990 if (oap != NULL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
991 && VIsual_mode == 'v'
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
992 && !vim_iswordc(gchar_pos(&end_visual))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
993 && EQUAL_POS(curwin->w_cursor, VIsual)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
994 && (pos = findmatch(oap, NUL)) != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
995 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
996 curwin->w_cursor = *pos;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
997 if (oap->motion_type == MLINE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
998 VIsual_mode = 'V';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
999 else if (*p_sel == 'e')
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1000 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1001 if (LT_POS(curwin->w_cursor, VIsual))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1002 ++VIsual.col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1003 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1004 ++curwin->w_cursor.col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1005 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1006 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1007 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1008
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1009 if (pos == NULL && (is_click || is_drag))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1010 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1011 // When not found a match or when dragging: extend to include
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1012 // a word.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1013 if (LT_POS(curwin->w_cursor, orig_cursor))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1014 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1015 find_start_of_word(&curwin->w_cursor);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1016 find_end_of_word(&VIsual);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1017 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1018 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1019 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1020 find_start_of_word(&VIsual);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1021 if (*p_sel == 'e' && *ml_get_cursor() != NUL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1022 curwin->w_cursor.col +=
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1023 (*mb_ptr2len)(ml_get_cursor());
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1024 find_end_of_word(&curwin->w_cursor);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1025 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1026 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1027 curwin->w_set_curswant = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1028 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1029 if (is_click)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1030 redraw_curbuf_later(INVERTED); // update the inversion
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1031 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1032 else if (VIsual_active && !old_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1033 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1034 if (mod_mask & MOD_MASK_ALT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1035 VIsual_mode = Ctrl_V;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1036 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1037 VIsual_mode = 'v';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1038 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1039
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1040 // If Visual mode changed show it later.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1041 if ((!VIsual_active && old_active && mode_displayed)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1042 || (VIsual_active && p_smd && msg_silent == 0
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1043 && (!old_active || VIsual_mode != old_mode)))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1044 redraw_cmdline = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1045
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1046 return moved;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1047 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1048
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1049 void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1050 ins_mouse(int c)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1051 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1052 pos_T tpos;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1053 win_T *old_curwin = curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1054
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1055 # ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1056 // When GUI is active, also move/paste when 'mouse' is empty
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1057 if (!gui.in_use)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1058 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1059 if (!mouse_has(MOUSE_INSERT))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1060 return;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1061
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1062 undisplay_dollar();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1063 tpos = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1064 if (do_mouse(NULL, c, BACKWARD, 1L, 0))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1065 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1066 win_T *new_curwin = curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1067
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1068 if (curwin != old_curwin && win_valid(old_curwin))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1069 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1070 // Mouse took us to another window. We need to go back to the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1071 // previous one to stop insert there properly.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1072 curwin = old_curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1073 curbuf = curwin->w_buffer;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1074 #ifdef FEAT_JOB_CHANNEL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1075 if (bt_prompt(curbuf))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1076 // Restart Insert mode when re-entering the prompt buffer.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1077 curbuf->b_prompt_insert = 'A';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1078 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1079 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1080 start_arrow(curwin == old_curwin ? &tpos : NULL);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1081 if (curwin != new_curwin && win_valid(new_curwin))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1082 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1083 curwin = new_curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1084 curbuf = curwin->w_buffer;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1085 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1086 set_can_cindent(TRUE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1087 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1088
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1089 // redraw status lines (in case another window became active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1090 redraw_statuslines();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1091 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1092
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1093 void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1094 ins_mousescroll(int dir)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1095 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1096 pos_T tpos;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1097 win_T *old_curwin = curwin, *wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1098 int did_scroll = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1099
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1100 tpos = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1101
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1102 if (mouse_row >= 0 && mouse_col >= 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1103 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1104 int row, col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1105
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1106 row = mouse_row;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1107 col = mouse_col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1108
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1109 // find the window at the pointer coordinates
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1110 wp = mouse_find_win(&row, &col, FIND_POPUP);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1111 if (wp == NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1112 return;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1113 curwin = wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1114 curbuf = curwin->w_buffer;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1115 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1116 if (curwin == old_curwin)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1117 undisplay_dollar();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1118
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1119 // Don't scroll the window in which completion is being done.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1120 if (!pum_visible() || curwin != old_curwin)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1121 {
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1122 long step;
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1123
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1124 if (dir == MSCR_DOWN || dir == MSCR_UP)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1125 {
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1126 if (mouse_vert_step < 0
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1127 || mod_mask & (MOD_MASK_SHIFT | MOD_MASK_CTRL))
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1128 step = (long)(curwin->w_botline - curwin->w_topline);
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1129 else
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1130 step = mouse_vert_step;
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1131 scroll_redraw(dir, step);
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
1132 # ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1133 if (WIN_IS_POPUP(curwin))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1134 popup_set_firstline(curwin);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1135 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1136 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1137 #ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1138 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1139 {
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1140 int val;
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1141
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1142 if (mouse_hor_step < 0
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1143 || mod_mask & (MOD_MASK_SHIFT | MOD_MASK_CTRL))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1144 step = curwin->w_width;
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1145 else
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
1146 step = mouse_hor_step;
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1147 val = curwin->w_leftcol + (dir == MSCR_RIGHT ? -step : step);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1148 if (val < 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1149 val = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1150 gui_do_horiz_scroll(val, TRUE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1151 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1152 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1153 did_scroll = TRUE;
28558
2edad5db074c patch 8.2.4803: WinScrolled not always triggered when scrolling with mouse
Bram Moolenaar <Bram@vim.org>
parents: 28333
diff changeset
1154 may_trigger_winscrolled();
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1155 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1156
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1157 curwin->w_redr_status = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1158
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1159 curwin = old_curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1160 curbuf = curwin->w_buffer;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1161
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1162 // The popup menu may overlay the window, need to redraw it.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1163 // TODO: Would be more efficient to only redraw the windows that are
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1164 // overlapped by the popup menu.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1165 if (pum_visible() && did_scroll)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1166 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1167 redraw_all_later(NOT_VALID);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1168 ins_compl_show_pum();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1169 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1170
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1171 if (!EQUAL_POS(curwin->w_cursor, tpos))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1172 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1173 start_arrow(&tpos);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1174 set_can_cindent(TRUE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1175 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1176 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1177
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1178 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1179 * Return TRUE if "c" is a mouse key.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1180 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1181 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1182 is_mouse_key(int c)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1183 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1184 return c == K_LEFTMOUSE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1185 || c == K_LEFTMOUSE_NM
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1186 || c == K_LEFTDRAG
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1187 || c == K_LEFTRELEASE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1188 || c == K_LEFTRELEASE_NM
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1189 || c == K_MOUSEMOVE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1190 || c == K_MIDDLEMOUSE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1191 || c == K_MIDDLEDRAG
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1192 || c == K_MIDDLERELEASE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1193 || c == K_RIGHTMOUSE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1194 || c == K_RIGHTDRAG
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1195 || c == K_RIGHTRELEASE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1196 || c == K_MOUSEDOWN
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1197 || c == K_MOUSEUP
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1198 || c == K_MOUSELEFT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1199 || c == K_MOUSERIGHT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1200 || c == K_X1MOUSE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1201 || c == K_X1DRAG
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1202 || c == K_X1RELEASE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1203 || c == K_X2MOUSE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1204 || c == K_X2DRAG
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1205 || c == K_X2RELEASE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1206 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1207
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1208 static struct mousetable
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1209 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1210 int pseudo_code; // Code for pseudo mouse event
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1211 int button; // Which mouse button is it?
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1212 int is_click; // Is it a mouse button click event?
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1213 int is_drag; // Is it a mouse drag event?
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1214 } mouse_table[] =
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1215 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1216 {(int)KE_LEFTMOUSE, MOUSE_LEFT, TRUE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1217 #ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1218 {(int)KE_LEFTMOUSE_NM, MOUSE_LEFT, TRUE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1219 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1220 {(int)KE_LEFTDRAG, MOUSE_LEFT, FALSE, TRUE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1221 {(int)KE_LEFTRELEASE, MOUSE_LEFT, FALSE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1222 #ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1223 {(int)KE_LEFTRELEASE_NM, MOUSE_LEFT, FALSE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1224 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1225 {(int)KE_MIDDLEMOUSE, MOUSE_MIDDLE, TRUE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1226 {(int)KE_MIDDLEDRAG, MOUSE_MIDDLE, FALSE, TRUE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1227 {(int)KE_MIDDLERELEASE, MOUSE_MIDDLE, FALSE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1228 {(int)KE_RIGHTMOUSE, MOUSE_RIGHT, TRUE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1229 {(int)KE_RIGHTDRAG, MOUSE_RIGHT, FALSE, TRUE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1230 {(int)KE_RIGHTRELEASE, MOUSE_RIGHT, FALSE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1231 {(int)KE_X1MOUSE, MOUSE_X1, TRUE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1232 {(int)KE_X1DRAG, MOUSE_X1, FALSE, TRUE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1233 {(int)KE_X1RELEASE, MOUSE_X1, FALSE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1234 {(int)KE_X2MOUSE, MOUSE_X2, TRUE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1235 {(int)KE_X2DRAG, MOUSE_X2, FALSE, TRUE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1236 {(int)KE_X2RELEASE, MOUSE_X2, FALSE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1237 // DRAG without CLICK
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1238 {(int)KE_MOUSEMOVE, MOUSE_RELEASE, FALSE, TRUE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1239 // RELEASE without CLICK
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1240 {(int)KE_IGNORE, MOUSE_RELEASE, FALSE, FALSE},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1241 {0, 0, 0, 0},
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1242 };
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1243
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1244 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1245 * Look up the given mouse code to return the relevant information in the other
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1246 * arguments. Return which button is down or was released.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1247 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1248 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1249 get_mouse_button(int code, int *is_click, int *is_drag)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1250 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1251 int i;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1252
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1253 for (i = 0; mouse_table[i].pseudo_code; i++)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1254 if (code == mouse_table[i].pseudo_code)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1255 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1256 *is_click = mouse_table[i].is_click;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1257 *is_drag = mouse_table[i].is_drag;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1258 return mouse_table[i].button;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1259 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1260 return 0; // Shouldn't get here
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1261 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1262
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1263 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1264 * Return the appropriate pseudo mouse event token (KE_LEFTMOUSE etc) based on
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1265 * the given information about which mouse button is down, and whether the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1266 * mouse was clicked, dragged or released.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1267 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1268 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1269 get_pseudo_mouse_code(
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1270 int button, // eg MOUSE_LEFT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1271 int is_click,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1272 int is_drag)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1273 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1274 int i;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1275
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1276 for (i = 0; mouse_table[i].pseudo_code; i++)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1277 if (button == mouse_table[i].button
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1278 && is_click == mouse_table[i].is_click
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1279 && is_drag == mouse_table[i].is_drag)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1280 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1281 #ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1282 // Trick: a non mappable left click and release has mouse_col -1
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1283 // or added MOUSE_COLOFF. Used for 'mousefocus' in
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1284 // gui_mouse_moved()
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1285 if (mouse_col < 0 || mouse_col > MOUSE_COLOFF)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1286 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1287 if (mouse_col < 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1288 mouse_col = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1289 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1290 mouse_col -= MOUSE_COLOFF;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1291 if (mouse_table[i].pseudo_code == (int)KE_LEFTMOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1292 return (int)KE_LEFTMOUSE_NM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1293 if (mouse_table[i].pseudo_code == (int)KE_LEFTRELEASE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1294 return (int)KE_LEFTRELEASE_NM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1295 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1296 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1297 return mouse_table[i].pseudo_code;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1298 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1299 return (int)KE_IGNORE; // not recognized, ignore it
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1300 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1301
18354
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1302 # define HMT_NORMAL 1
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1303 # define HMT_NETTERM 2
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1304 # define HMT_DEC 4
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1305 # define HMT_JSBTERM 8
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1306 # define HMT_PTERM 16
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1307 # define HMT_URXVT 32
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1308 # define HMT_GPM 64
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1309 # define HMT_SGR 128
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1310 # define HMT_SGR_REL 256
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1311 static int has_mouse_termcode = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1312
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1313 void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1314 set_mouse_termcode(
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1315 int n, // KS_MOUSE, KS_NETTERM_MOUSE or KS_DEC_MOUSE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1316 char_u *s)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1317 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1318 char_u name[2];
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1319
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1320 name[0] = n;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1321 name[1] = KE_FILLER;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1322 add_termcode(name, s, FALSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1323 # ifdef FEAT_MOUSE_JSB
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1324 if (n == KS_JSBTERM_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1325 has_mouse_termcode |= HMT_JSBTERM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1326 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1327 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1328 # ifdef FEAT_MOUSE_NET
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1329 if (n == KS_NETTERM_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1330 has_mouse_termcode |= HMT_NETTERM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1331 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1332 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1333 # ifdef FEAT_MOUSE_DEC
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1334 if (n == KS_DEC_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1335 has_mouse_termcode |= HMT_DEC;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1336 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1337 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1338 # ifdef FEAT_MOUSE_PTERM
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1339 if (n == KS_PTERM_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1340 has_mouse_termcode |= HMT_PTERM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1341 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1342 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1343 # ifdef FEAT_MOUSE_URXVT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1344 if (n == KS_URXVT_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1345 has_mouse_termcode |= HMT_URXVT;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1346 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1347 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1348 # ifdef FEAT_MOUSE_GPM
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1349 if (n == KS_GPM_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1350 has_mouse_termcode |= HMT_GPM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1351 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1352 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1353 if (n == KS_SGR_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1354 has_mouse_termcode |= HMT_SGR;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1355 else if (n == KS_SGR_MOUSE_RELEASE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1356 has_mouse_termcode |= HMT_SGR_REL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1357 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1358 has_mouse_termcode |= HMT_NORMAL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1359 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1360
18354
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1361 # if defined(UNIX) || defined(VMS) || defined(PROTO)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1362 void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1363 del_mouse_termcode(
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1364 int n) // KS_MOUSE, KS_NETTERM_MOUSE or KS_DEC_MOUSE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1365 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1366 char_u name[2];
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1367
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1368 name[0] = n;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1369 name[1] = KE_FILLER;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1370 del_termcode(name);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1371 # ifdef FEAT_MOUSE_JSB
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1372 if (n == KS_JSBTERM_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1373 has_mouse_termcode &= ~HMT_JSBTERM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1374 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1375 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1376 # ifdef FEAT_MOUSE_NET
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1377 if (n == KS_NETTERM_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1378 has_mouse_termcode &= ~HMT_NETTERM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1379 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1380 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1381 # ifdef FEAT_MOUSE_DEC
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1382 if (n == KS_DEC_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1383 has_mouse_termcode &= ~HMT_DEC;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1384 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1385 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1386 # ifdef FEAT_MOUSE_PTERM
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1387 if (n == KS_PTERM_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1388 has_mouse_termcode &= ~HMT_PTERM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1389 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1390 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1391 # ifdef FEAT_MOUSE_URXVT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1392 if (n == KS_URXVT_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1393 has_mouse_termcode &= ~HMT_URXVT;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1394 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1395 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1396 # ifdef FEAT_MOUSE_GPM
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1397 if (n == KS_GPM_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1398 has_mouse_termcode &= ~HMT_GPM;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1399 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1400 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1401 if (n == KS_SGR_MOUSE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1402 has_mouse_termcode &= ~HMT_SGR;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1403 else if (n == KS_SGR_MOUSE_RELEASE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1404 has_mouse_termcode &= ~HMT_SGR_REL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1405 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1406 has_mouse_termcode &= ~HMT_NORMAL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1407 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1408 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1409
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1410 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1411 * setmouse() - switch mouse on/off depending on current mode and 'mouse'
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1412 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1413 void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1414 setmouse(void)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1415 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1416 int checkfor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1417
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1418 # ifdef FEAT_MOUSESHAPE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1419 update_mouseshape(-1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1420 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1421
18354
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
1422 // Should be outside proc, but may break MOUSESHAPE
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1423 # ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1424 // In the GUI the mouse is always enabled.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1425 if (gui.in_use)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1426 return;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1427 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1428 // be quick when mouse is off
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1429 if (*p_mouse == NUL || has_mouse_termcode == 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1430 return;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1431
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1432 // don't switch mouse on when not in raw mode (Ex mode)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1433 if (cur_tmode != TMODE_RAW)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1434 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1435 mch_setmouse(FALSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1436 return;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1437 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1438
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1439 if (VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1440 checkfor = MOUSE_VISUAL;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
1441 else if (State == MODE_HITRETURN || State == MODE_ASKMORE
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
1442 || State == MODE_SETWSIZE)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1443 checkfor = MOUSE_RETURN;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
1444 else if (State & MODE_INSERT)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1445 checkfor = MOUSE_INSERT;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
1446 else if (State & MODE_CMDLINE)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1447 checkfor = MOUSE_COMMAND;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28755
diff changeset
1448 else if (State == MODE_CONFIRM || State == MODE_EXTERNCMD)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1449 checkfor = ' '; // don't use mouse for ":confirm" or ":!cmd"
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1450 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1451 checkfor = MOUSE_NORMAL; // assume normal mode
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1452
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1453 if (mouse_has(checkfor))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1454 mch_setmouse(TRUE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1455 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1456 mch_setmouse(FALSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1457 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1458
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1459 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1460 * Return TRUE if
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1461 * - "c" is in 'mouse', or
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1462 * - 'a' is in 'mouse' and "c" is in MOUSE_A, or
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1463 * - the current buffer is a help file and 'h' is in 'mouse' and we are in a
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1464 * normal editing mode (not at hit-return message).
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1465 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1466 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1467 mouse_has(int c)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1468 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1469 char_u *p;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1470
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1471 for (p = p_mouse; *p; ++p)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1472 switch (*p)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1473 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1474 case 'a': if (vim_strchr((char_u *)MOUSE_A, c) != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1475 return TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1476 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1477 case MOUSE_HELP: if (c != MOUSE_RETURN && curbuf->b_help)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1478 return TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1479 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1480 default: if (c == *p) return TRUE; break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1481 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1482 return FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1483 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1484
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1485 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1486 * Return TRUE when 'mousemodel' is set to "popup" or "popup_setpos".
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1487 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1488 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1489 mouse_model_popup(void)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1490 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1491 return (p_mousem[0] == 'p');
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1492 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1493
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1494 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1495 * Move the cursor to the specified row and column on the screen.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1496 * Change current window if necessary. Returns an integer with the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1497 * CURSOR_MOVED bit set if the cursor has moved or unset otherwise.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1498 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1499 * The MOUSE_FOLD_CLOSE bit is set when clicked on the '-' in a fold column.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1500 * The MOUSE_FOLD_OPEN bit is set when clicked on the '+' in a fold column.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1501 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1502 * If flags has MOUSE_FOCUS, then the current window will not be changed, and
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1503 * if the mouse is outside the window then the text will scroll, or if the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1504 * mouse was previously on a status line, then the status line may be dragged.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1505 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1506 * If flags has MOUSE_MAY_VIS, then VIsual mode will be started before the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1507 * cursor is moved unless the cursor was on a status line.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1508 * This function returns one of IN_UNKNOWN, IN_BUFFER, IN_STATUS_LINE or
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1509 * IN_SEP_LINE depending on where the cursor was clicked.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1510 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1511 * If flags has MOUSE_MAY_STOP_VIS, then Visual mode will be stopped, unless
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1512 * the mouse is on the status line of the same window.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1513 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1514 * If flags has MOUSE_DID_MOVE, nothing is done if the mouse didn't move since
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1515 * the last call.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1516 *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1517 * If flags has MOUSE_SETPOS, nothing is done, only the current position is
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1518 * remembered.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1519 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1520 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1521 jump_to_mouse(
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1522 int flags,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1523 int *inclusive, // used for inclusive operator, can be NULL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1524 int which_button) // MOUSE_LEFT, MOUSE_RIGHT, MOUSE_MIDDLE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1525 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1526 static int on_status_line = 0; // #lines below bottom of window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1527 static int on_sep_line = 0; // on separator right of window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1528 #ifdef FEAT_MENU
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1529 static int in_winbar = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1530 #endif
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
1531 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1532 static int in_popup_win = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1533 static win_T *click_in_popup_win = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1534 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1535 static int prev_row = -1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1536 static int prev_col = -1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1537 static win_T *dragwin = NULL; // window being dragged
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1538 static int did_drag = FALSE; // drag was noticed
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1539
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1540 win_T *wp, *old_curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1541 pos_T old_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1542 int count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1543 int first;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1544 int row = mouse_row;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1545 int col = mouse_col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1546 #ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1547 int mouse_char;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1548 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1549
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1550 mouse_past_bottom = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1551 mouse_past_eol = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1552
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1553 if (flags & MOUSE_RELEASED)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1554 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1555 // On button release we may change window focus if positioned on a
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1556 // status line and no dragging happened.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1557 if (dragwin != NULL && !did_drag)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1558 flags &= ~(MOUSE_FOCUS | MOUSE_DID_MOVE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1559 dragwin = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1560 did_drag = FALSE;
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
1561 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1562 if (click_in_popup_win != NULL && popup_dragwin == NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1563 popup_close_for_mouse_click(click_in_popup_win);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1564
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1565 popup_dragwin = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1566 click_in_popup_win = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1567 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1568 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1569
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1570 if ((flags & MOUSE_DID_MOVE)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1571 && prev_row == mouse_row
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1572 && prev_col == mouse_col)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1573 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1574 retnomove:
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1575 // before moving the cursor for a left click which is NOT in a status
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1576 // line, stop Visual mode
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1577 if (on_status_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1578 return IN_STATUS_LINE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1579 if (on_sep_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1580 return IN_SEP_LINE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1581 #ifdef FEAT_MENU
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1582 if (in_winbar)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1583 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1584 // A quick second click may arrive as a double-click, but we use it
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1585 // as a second click in the WinBar.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1586 if ((mod_mask & MOD_MASK_MULTI_CLICK) && !(flags & MOUSE_RELEASED))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1587 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1588 wp = mouse_find_win(&row, &col, FAIL_POPUP);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1589 if (wp == NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1590 return IN_UNKNOWN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1591 winbar_click(wp, col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1592 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1593 return IN_OTHER_WIN | MOUSE_WINBAR;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1594 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1595 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1596 if (flags & MOUSE_MAY_STOP_VIS)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1597 {
24788
b36ceac30454 patch 8.2.2932: select mode test fails
Bram Moolenaar <Bram@vim.org>
parents: 24784
diff changeset
1598 end_visual_mode_keep_button();
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1599 redraw_curbuf_later(INVERTED); // delete the inversion
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1600 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1601 #if defined(FEAT_CMDWIN) && defined(FEAT_CLIPBOARD)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1602 // Continue a modeless selection in another window.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1603 if (cmdwin_type != 0 && row < curwin->w_winrow)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1604 return IN_OTHER_WIN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1605 #endif
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
1606 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1607 // Continue a modeless selection in a popup window or dragging it.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1608 if (in_popup_win)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1609 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1610 click_in_popup_win = NULL; // don't close it on release
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1611 if (popup_dragwin != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1612 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1613 // dragging a popup window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1614 popup_drag(popup_dragwin);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1615 return IN_UNKNOWN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1616 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1617 return IN_OTHER_WIN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1618 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1619 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1620 return IN_BUFFER;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1621 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1622
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1623 prev_row = mouse_row;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1624 prev_col = mouse_col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1625
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1626 if (flags & MOUSE_SETPOS)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1627 goto retnomove; // ugly goto...
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1628
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1629 #ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1630 // Remember the character under the mouse, it might be a '-' or '+' in the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1631 // fold column.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1632 if (row >= 0 && row < Rows && col >= 0 && col <= Columns
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1633 && ScreenLines != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1634 mouse_char = ScreenLines[LineOffset[row] + col];
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1635 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1636 mouse_char = ' ';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1637 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1638
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1639 old_curwin = curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1640 old_cursor = curwin->w_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1641
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1642 if (!(flags & MOUSE_FOCUS))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1643 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1644 if (row < 0 || col < 0) // check if it makes sense
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1645 return IN_UNKNOWN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1646
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1647 // find the window where the row is in and adjust "row" and "col" to be
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1648 // relative to top-left of the window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1649 wp = mouse_find_win(&row, &col, FIND_POPUP);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1650 if (wp == NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1651 return IN_UNKNOWN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1652 dragwin = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1653
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
1654 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1655 // Click in a popup window may start dragging or modeless selection,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1656 // but not much else.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1657 if (WIN_IS_POPUP(wp))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1658 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1659 on_sep_line = 0;
26300
0374f55a16be patch 8.2.3681: cannot drag popup window after click on a status line
Bram Moolenaar <Bram@vim.org>
parents: 24788
diff changeset
1660 on_status_line = 0;
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1661 in_popup_win = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1662 if (which_button == MOUSE_LEFT && popup_close_if_on_X(wp, row, col))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1663 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1664 return IN_UNKNOWN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1665 }
26332
8b7f01b39d79 patch 8.2.3697: cannot drag a popup without a border
Bram Moolenaar <Bram@vim.org>
parents: 26300
diff changeset
1666 else if (((wp->w_popup_flags & (POPF_DRAG | POPF_RESIZE))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1667 && popup_on_border(wp, row, col))
26332
8b7f01b39d79 patch 8.2.3697: cannot drag a popup without a border
Bram Moolenaar <Bram@vim.org>
parents: 26300
diff changeset
1668 || (wp->w_popup_flags & POPF_DRAGALL))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1669 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1670 popup_dragwin = wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1671 popup_start_drag(wp, row, col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1672 return IN_UNKNOWN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1673 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1674 // Only close on release, otherwise it's not possible to drag or do
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1675 // modeless selection.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1676 else if (wp->w_popup_close == POPCLOSE_CLICK
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1677 && which_button == MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1678 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1679 click_in_popup_win = wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1680 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1681 else if (which_button == MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1682 // If the click is in the scrollbar, may scroll up/down.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1683 popup_handle_scrollbar_click(wp, row, col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1684 # ifdef FEAT_CLIPBOARD
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1685 return IN_OTHER_WIN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1686 # else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1687 return IN_UNKNOWN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1688 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1689 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1690 in_popup_win = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1691 popup_dragwin = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1692 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1693 #ifdef FEAT_MENU
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1694 if (row == -1)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1695 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1696 // A click in the window toolbar does not enter another window or
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1697 // change Visual highlighting.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1698 winbar_click(wp, col);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1699 in_winbar = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1700 return IN_OTHER_WIN | MOUSE_WINBAR;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1701 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1702 in_winbar = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1703 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1704
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1705 // winpos and height may change in win_enter()!
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1706 if (row >= wp->w_height) // In (or below) status line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1707 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1708 on_status_line = row - wp->w_height + 1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1709 dragwin = wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1710 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1711 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1712 on_status_line = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1713 if (col >= wp->w_width) // In separator line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1714 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1715 on_sep_line = col - wp->w_width + 1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1716 dragwin = wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1717 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1718 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1719 on_sep_line = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1720
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1721 // The rightmost character of the status line might be a vertical
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1722 // separator character if there is no connecting window to the right.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1723 if (on_status_line && on_sep_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1724 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1725 if (stl_connected(wp))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1726 on_sep_line = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1727 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1728 on_status_line = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1729 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1730
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1731 // Before jumping to another buffer, or moving the cursor for a left
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1732 // click, stop Visual mode.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1733 if (VIsual_active
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1734 && (wp->w_buffer != curwin->w_buffer
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1735 || (!on_status_line && !on_sep_line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1736 #ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1737 && (
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1738 # ifdef FEAT_RIGHTLEFT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1739 wp->w_p_rl ? col < wp->w_width - wp->w_p_fdc :
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1740 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1741 col >= wp->w_p_fdc
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1742 # ifdef FEAT_CMDWIN
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1743 + (cmdwin_type == 0 && wp == curwin ? 0 : 1)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1744 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1745 )
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1746 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1747 && (flags & MOUSE_MAY_STOP_VIS))))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1748 {
24788
b36ceac30454 patch 8.2.2932: select mode test fails
Bram Moolenaar <Bram@vim.org>
parents: 24784
diff changeset
1749 end_visual_mode_keep_button();
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1750 redraw_curbuf_later(INVERTED); // delete the inversion
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1751 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1752 #ifdef FEAT_CMDWIN
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1753 if (cmdwin_type != 0 && wp != curwin)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1754 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1755 // A click outside the command-line window: Use modeless
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1756 // selection if possible. Allow dragging the status lines.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1757 on_sep_line = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1758 # ifdef FEAT_CLIPBOARD
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1759 if (on_status_line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1760 return IN_STATUS_LINE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1761 return IN_OTHER_WIN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1762 # else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1763 row = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1764 col += wp->w_wincol;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1765 wp = curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1766 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1767 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1768 #endif
19265
ce8c47ed54e5 patch 8.2.0191: cannot put a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1769 #if defined(FEAT_PROP_POPUP) && defined(FEAT_TERMINAL)
ce8c47ed54e5 patch 8.2.0191: cannot put a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1770 if (popup_is_popup(curwin) && curbuf->b_term != NULL)
ce8c47ed54e5 patch 8.2.0191: cannot put a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1771 // terminal in popup window: don't jump to another window
ce8c47ed54e5 patch 8.2.0191: cannot put a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1772 return IN_OTHER_WIN;
ce8c47ed54e5 patch 8.2.0191: cannot put a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1773 #endif
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1774 // Only change window focus when not clicking on or dragging the
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1775 // status line. Do change focus when releasing the mouse button
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1776 // (MOUSE_FOCUS was set above if we dragged first).
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1777 if (dragwin == NULL || (flags & MOUSE_RELEASED))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1778 win_enter(wp, TRUE); // can make wp invalid!
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1779
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1780 if (curwin != old_curwin)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1781 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1782 #ifdef CHECK_DOUBLE_CLICK
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1783 // set topline, to be able to check for double click ourselves
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1784 set_mouse_topline(curwin);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1785 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1786 #ifdef FEAT_TERMINAL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1787 // when entering a terminal window may change state
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1788 term_win_entered();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1789 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1790 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1791 if (on_status_line) // In (or below) status line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1792 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1793 // Don't use start_arrow() if we're in the same window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1794 if (curwin == old_curwin)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1795 return IN_STATUS_LINE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1796 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1797 return IN_STATUS_LINE | CURSOR_MOVED;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1798 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1799 if (on_sep_line) // In (or below) status line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1800 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1801 // Don't use start_arrow() if we're in the same window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1802 if (curwin == old_curwin)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1803 return IN_SEP_LINE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1804 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1805 return IN_SEP_LINE | CURSOR_MOVED;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1806 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1807
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1808 curwin->w_cursor.lnum = curwin->w_topline;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1809 #ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1810 // remember topline, needed for double click
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1811 gui_prev_topline = curwin->w_topline;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1812 # ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1813 gui_prev_topfill = curwin->w_topfill;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1814 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1815 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1816 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1817 else if (on_status_line && which_button == MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1818 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1819 if (dragwin != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1820 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1821 // Drag the status line
28923
2d726d5a6405 patch 8.2.4984: dragging statusline fails for window with winbar
Bram Moolenaar <Bram@vim.org>
parents: 28809
diff changeset
1822 count = row - W_WINROW(dragwin) - dragwin->w_height + 1
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1823 - on_status_line;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1824 win_drag_status_line(dragwin, count);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1825 did_drag |= count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1826 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1827 return IN_STATUS_LINE; // Cursor didn't move
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1828 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1829 else if (on_sep_line && which_button == MOUSE_LEFT)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1830 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1831 if (dragwin != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1832 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1833 // Drag the separator column
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1834 count = col - dragwin->w_wincol - dragwin->w_width + 1
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1835 - on_sep_line;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1836 win_drag_vsep_line(dragwin, count);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1837 did_drag |= count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1838 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1839 return IN_SEP_LINE; // Cursor didn't move
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1840 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1841 #ifdef FEAT_MENU
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1842 else if (in_winbar)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1843 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1844 // After a click on the window toolbar don't start Visual mode.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1845 return IN_OTHER_WIN | MOUSE_WINBAR;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1846 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1847 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1848 else // keep_window_focus must be TRUE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1849 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1850 // before moving the cursor for a left click, stop Visual mode
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1851 if (flags & MOUSE_MAY_STOP_VIS)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1852 {
24788
b36ceac30454 patch 8.2.2932: select mode test fails
Bram Moolenaar <Bram@vim.org>
parents: 24784
diff changeset
1853 end_visual_mode_keep_button();
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1854 redraw_curbuf_later(INVERTED); // delete the inversion
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1855 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1856
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1857 #if defined(FEAT_CMDWIN) && defined(FEAT_CLIPBOARD)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1858 // Continue a modeless selection in another window.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1859 if (cmdwin_type != 0 && row < curwin->w_winrow)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1860 return IN_OTHER_WIN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1861 #endif
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
1862 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1863 if (in_popup_win)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1864 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1865 if (popup_dragwin != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1866 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1867 // dragging a popup window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1868 popup_drag(popup_dragwin);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1869 return IN_UNKNOWN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1870 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1871 // continue a modeless selection in a popup window
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1872 click_in_popup_win = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1873 return IN_OTHER_WIN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1874 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1875 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1876
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1877 row -= W_WINROW(curwin);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1878 col -= curwin->w_wincol;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1879
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1880 // When clicking beyond the end of the window, scroll the screen.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1881 // Scroll by however many rows outside the window we are.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1882 if (row < 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1883 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1884 count = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1885 for (first = TRUE; curwin->w_topline > 1; )
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1886 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1887 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1888 if (curwin->w_topfill < diff_check(curwin, curwin->w_topline))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1889 ++count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1890 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1891 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1892 count += plines(curwin->w_topline - 1);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1893 if (!first && count > -row)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1894 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1895 first = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1896 #ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1897 (void)hasFolding(curwin->w_topline, &curwin->w_topline, NULL);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1898 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1899 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1900 if (curwin->w_topfill < diff_check(curwin, curwin->w_topline))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1901 ++curwin->w_topfill;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1902 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1903 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1904 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1905 --curwin->w_topline;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1906 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1907 curwin->w_topfill = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1908 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1909 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1910 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1911 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1912 check_topfill(curwin, FALSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1913 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1914 curwin->w_valid &=
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1915 ~(VALID_WROW|VALID_CROW|VALID_BOTLINE|VALID_BOTLINE_AP);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1916 redraw_later(VALID);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1917 row = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1918 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1919 else if (row >= curwin->w_height)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1920 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1921 count = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1922 for (first = TRUE; curwin->w_topline < curbuf->b_ml.ml_line_count; )
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1923 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1924 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1925 if (curwin->w_topfill > 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1926 ++count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1927 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1928 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1929 count += plines(curwin->w_topline);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1930 if (!first && count > row - curwin->w_height + 1)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1931 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1932 first = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1933 #ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1934 if (hasFolding(curwin->w_topline, NULL, &curwin->w_topline)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1935 && curwin->w_topline == curbuf->b_ml.ml_line_count)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1936 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1937 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1938 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1939 if (curwin->w_topfill > 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1940 --curwin->w_topfill;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1941 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1942 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1943 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1944 ++curwin->w_topline;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1945 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1946 curwin->w_topfill =
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1947 diff_check_fill(curwin, curwin->w_topline);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1948 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1949 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1950 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1951 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1952 check_topfill(curwin, FALSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1953 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1954 redraw_later(VALID);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1955 curwin->w_valid &=
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1956 ~(VALID_WROW|VALID_CROW|VALID_BOTLINE|VALID_BOTLINE_AP);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1957 row = curwin->w_height - 1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1958 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1959 else if (row == 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1960 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1961 // When dragging the mouse, while the text has been scrolled up as
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1962 // far as it goes, moving the mouse in the top line should scroll
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1963 // the text down (done later when recomputing w_topline).
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1964 if (mouse_dragging > 0
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1965 && curwin->w_cursor.lnum
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1966 == curwin->w_buffer->b_ml.ml_line_count
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1967 && curwin->w_cursor.lnum == curwin->w_topline)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1968 curwin->w_valid &= ~(VALID_TOPLINE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1969 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1970 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1971
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1972 #ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1973 // Check for position outside of the fold column.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1974 if (
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1975 # ifdef FEAT_RIGHTLEFT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1976 curwin->w_p_rl ? col < curwin->w_width - curwin->w_p_fdc :
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1977 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1978 col >= curwin->w_p_fdc
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1979 # ifdef FEAT_CMDWIN
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1980 + (cmdwin_type == 0 ? 0 : 1)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1981 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1982 )
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1983 mouse_char = ' ';
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1984 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1985
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1986 // compute the position in the buffer line from the posn on the screen
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1987 if (mouse_comp_pos(curwin, &row, &col, &curwin->w_cursor.lnum, NULL))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1988 mouse_past_bottom = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1989
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1990 // Start Visual mode before coladvance(), for when 'sel' != "old"
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1991 if ((flags & MOUSE_MAY_VIS) && !VIsual_active)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1992 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1993 check_visual_highlight();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1994 VIsual = old_cursor;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1995 VIsual_active = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1996 VIsual_reselect = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1997 // if 'selectmode' contains "mouse", start Select mode
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1998 may_start_select('o');
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1999 setmouse();
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2000 if (p_smd && msg_silent == 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2001 redraw_cmdline = TRUE; // show visual mode later
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2002 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2003
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2004 curwin->w_curswant = col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2005 curwin->w_set_curswant = FALSE; // May still have been TRUE
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2006 if (coladvance(col) == FAIL) // Mouse click beyond end of line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2007 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2008 if (inclusive != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2009 *inclusive = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2010 mouse_past_eol = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2011 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2012 else if (inclusive != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2013 *inclusive = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2014
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2015 count = IN_BUFFER;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2016 if (curwin != old_curwin || curwin->w_cursor.lnum != old_cursor.lnum
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2017 || curwin->w_cursor.col != old_cursor.col)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2018 count |= CURSOR_MOVED; // Cursor has moved
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2019
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2020 # ifdef FEAT_FOLDING
23964
17697c4e5d48 patch 8.2.2524: cannot change the characters displayed in the foldcolumn
Bram Moolenaar <Bram@vim.org>
parents: 22788
diff changeset
2021 if (mouse_char == fill_foldclosed)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2022 count |= MOUSE_FOLD_OPEN;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2023 else if (mouse_char != ' ')
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2024 count |= MOUSE_FOLD_CLOSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2025 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2026
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2027 return count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2028 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2029
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2030 /*
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2031 * Mouse scroll wheel: Default action is to scroll mouse_vert_step lines (or
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2032 * mouse_hor_step, depending on the scroll direction), or one page when Shift or
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2033 * Ctrl is used.
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2034 * K_MOUSEUP (cap->arg == 1) or K_MOUSEDOWN (cap->arg == 0) or
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2035 * K_MOUSELEFT (cap->arg == -1) or K_MOUSERIGHT (cap->arg == -2)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2036 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2037 void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2038 nv_mousescroll(cmdarg_T *cap)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2039 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2040 win_T *old_curwin = curwin, *wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2041
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2042 if (mouse_row >= 0 && mouse_col >= 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2043 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2044 int row, col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2045
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2046 row = mouse_row;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2047 col = mouse_col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2048
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2049 // find the window at the pointer coordinates
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2050 wp = mouse_find_win(&row, &col, FIND_POPUP);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2051 if (wp == NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2052 return;
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
2053 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2054 if (WIN_IS_POPUP(wp) && !wp->w_has_scrollbar)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2055 return;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2056 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2057 curwin = wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2058 curbuf = curwin->w_buffer;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2059 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2060 if (cap->arg == MSCR_UP || cap->arg == MSCR_DOWN)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2061 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2062 # ifdef FEAT_TERMINAL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2063 if (term_use_loop())
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2064 // This window is a terminal window, send the mouse event there.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2065 // Set "typed" to FALSE to avoid an endless loop.
18508
3cd689e9eb7f patch 8.1.2248: CTRL-W dot does not work when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 18354
diff changeset
2066 send_keys_to_term(curbuf->b_term, cap->cmdchar, mod_mask, FALSE);
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2067 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2068 # endif
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2069 if (mouse_vert_step < 0 || mod_mask & (MOD_MASK_SHIFT | MOD_MASK_CTRL))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2070 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2071 (void)onepage(cap->arg ? FORWARD : BACKWARD, 1L);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2072 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2073 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2074 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2075 // Don't scroll more than half the window height.
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2076 if (curwin->w_height < mouse_vert_step * 2)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2077 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2078 cap->count1 = curwin->w_height / 2;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2079 if (cap->count1 == 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2080 cap->count1 = 1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2081 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2082 else
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2083 cap->count1 = mouse_vert_step;
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2084 cap->count0 = cap->count1;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2085 nv_scroll_line(cap);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2086 }
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
2087 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2088 if (WIN_IS_POPUP(curwin))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2089 popup_set_firstline(curwin);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2090 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2091 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2092 # ifdef FEAT_GUI
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2093 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2094 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2095 // Horizontal scroll - only allowed when 'wrap' is disabled
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2096 if (!curwin->w_p_wrap)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2097 {
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2098 int val, step;
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2099
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2100 if (mouse_hor_step < 0
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2101 || mod_mask & (MOD_MASK_SHIFT | MOD_MASK_CTRL))
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2102 step = curwin->w_width;
28755
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2103 else
26a2836923d6 patch 8.2.4902: mouse wheel scrolling is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 28558
diff changeset
2104 step = mouse_hor_step;
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2105 val = curwin->w_leftcol + (cap->arg == MSCR_RIGHT ? -step : +step);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2106 if (val < 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2107 val = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2108
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2109 gui_do_horiz_scroll(val, TRUE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2110 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2111 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2112 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2113 # ifdef FEAT_SYN_HL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2114 if (curwin != old_curwin && curwin->w_p_cul)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2115 redraw_for_cursorline(curwin);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2116 # endif
28558
2edad5db074c patch 8.2.4803: WinScrolled not always triggered when scrolling with mouse
Bram Moolenaar <Bram@vim.org>
parents: 28333
diff changeset
2117 may_trigger_winscrolled();
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2118
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2119 curwin->w_redr_status = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2120
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2121 curwin = old_curwin;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2122 curbuf = curwin->w_buffer;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2123 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2124
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2125 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2126 * Mouse clicks and drags.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2127 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2128 void
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2129 nv_mouse(cmdarg_T *cap)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2130 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2131 (void)do_mouse(cap->oap, cap->cmdchar, BACKWARD, cap->count1, 0);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2132 }
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2133
24784
288565c9b4e0 patch 8.2.2930: when a popup is visible a mouse move my restart Visual mode
Bram Moolenaar <Bram@vim.org>
parents: 23964
diff changeset
2134 static int held_button = MOUSE_RELEASE;
288565c9b4e0 patch 8.2.2930: when a popup is visible a mouse move my restart Visual mode
Bram Moolenaar <Bram@vim.org>
parents: 23964
diff changeset
2135
288565c9b4e0 patch 8.2.2930: when a popup is visible a mouse move my restart Visual mode
Bram Moolenaar <Bram@vim.org>
parents: 23964
diff changeset
2136 void
288565c9b4e0 patch 8.2.2930: when a popup is visible a mouse move my restart Visual mode
Bram Moolenaar <Bram@vim.org>
parents: 23964
diff changeset
2137 reset_held_button()
288565c9b4e0 patch 8.2.2930: when a popup is visible a mouse move my restart Visual mode
Bram Moolenaar <Bram@vim.org>
parents: 23964
diff changeset
2138 {
288565c9b4e0 patch 8.2.2930: when a popup is visible a mouse move my restart Visual mode
Bram Moolenaar <Bram@vim.org>
parents: 23964
diff changeset
2139 held_button = MOUSE_RELEASE;
288565c9b4e0 patch 8.2.2930: when a popup is visible a mouse move my restart Visual mode
Bram Moolenaar <Bram@vim.org>
parents: 23964
diff changeset
2140 }
288565c9b4e0 patch 8.2.2930: when a popup is visible a mouse move my restart Visual mode
Bram Moolenaar <Bram@vim.org>
parents: 23964
diff changeset
2141
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2142 /*
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2143 * Check if typebuf 'tp' contains a terminal mouse code and returns the
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2144 * modifiers found in typebuf in 'modifiers'.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2145 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2146 int
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2147 check_termcode_mouse(
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2148 char_u *tp,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2149 int *slen,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2150 char_u *key_name,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2151 char_u *modifiers_start,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2152 int idx,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2153 int *modifiers)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2154 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2155 int j;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2156 char_u *p;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2157 # if !defined(UNIX) || defined(FEAT_MOUSE_XTERM) || defined(FEAT_GUI) \
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2158 || defined(FEAT_MOUSE_GPM) || defined(FEAT_SYSMOUSE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2159 char_u bytes[6];
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2160 int num_bytes;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2161 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2162 int mouse_code = 0; // init for GCC
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2163 int is_click, is_drag;
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2164 int is_release, release_is_ambiguous;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2165 int wheel_code = 0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2166 int current_button;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2167 static int orig_num_clicks = 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2168 static int orig_mouse_code = 0x0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2169 # ifdef CHECK_DOUBLE_CLICK
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2170 static int orig_mouse_col = 0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2171 static int orig_mouse_row = 0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2172 static struct timeval orig_mouse_time = {0, 0};
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2173 // time of previous mouse click
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2174 struct timeval mouse_time; // time of current mouse click
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2175 long timediff; // elapsed time in msec
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2176 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2177
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2178 is_click = is_drag = is_release = release_is_ambiguous = FALSE;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2179
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2180 # if !defined(UNIX) || defined(FEAT_MOUSE_XTERM) || defined(FEAT_GUI) \
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2181 || defined(FEAT_MOUSE_GPM) || defined(FEAT_SYSMOUSE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2182 if (key_name[0] == KS_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2183 # ifdef FEAT_MOUSE_GPM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2184 || key_name[0] == KS_GPM_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2185 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2186 )
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2187 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2188 /*
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2189 * For xterm we get "<t_mouse>scr", where s == encoded button state:
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2190 * 0x20 = left button down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2191 * 0x21 = middle button down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2192 * 0x22 = right button down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2193 * 0x23 = any button release
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2194 * 0x60 = button 4 down (scroll wheel down)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2195 * 0x61 = button 5 down (scroll wheel up)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2196 * add 0x04 for SHIFT
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2197 * add 0x08 for ALT
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2198 * add 0x10 for CTRL
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2199 * add 0x20 for mouse drag (0x40 is drag with left button)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2200 * add 0x40 for mouse move (0x80 is move, 0x81 too)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2201 * 0x43 (drag + release) is also move
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2202 * c == column + ' ' + 1 == column + 33
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2203 * r == row + ' ' + 1 == row + 33
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2204 *
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2205 * The coordinates are passed on through global variables. Ugly, but
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2206 * this avoids trouble with mouse clicks at an unexpected moment and
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2207 * allows for mapping them.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2208 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2209 for (;;)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2210 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2211 # ifdef FEAT_GUI
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2212 if (gui.in_use)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2213 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2214 // GUI uses more bits for columns > 223
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2215 num_bytes = get_bytes_from_buf(tp + *slen, bytes, 5);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2216 if (num_bytes == -1) // not enough coordinates
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2217 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2218 mouse_code = bytes[0];
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2219 mouse_col = 128 * (bytes[1] - ' ' - 1)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2220 + bytes[2] - ' ' - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2221 mouse_row = 128 * (bytes[3] - ' ' - 1)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2222 + bytes[4] - ' ' - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2223 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2224 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2225 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2226 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2227 num_bytes = get_bytes_from_buf(tp + *slen, bytes, 3);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2228 if (num_bytes == -1) // not enough coordinates
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2229 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2230 mouse_code = bytes[0];
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2231 mouse_col = bytes[1] - ' ' - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2232 mouse_row = bytes[2] - ' ' - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2233 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2234 *slen += num_bytes;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2235
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2236 // If the following bytes is also a mouse code and it has the same
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2237 // code, dump this one and get the next. This makes dragging a
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2238 // whole lot faster.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2239 # ifdef FEAT_GUI
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2240 if (gui.in_use)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2241 j = 3;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2242 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2243 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2244 j = get_termcode_len(idx);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2245 if (STRNCMP(tp, tp + *slen, (size_t)j) == 0
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2246 && tp[*slen + j] == mouse_code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2247 && tp[*slen + j + 1] != NUL
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2248 && tp[*slen + j + 2] != NUL
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2249 # ifdef FEAT_GUI
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2250 && (!gui.in_use
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2251 || (tp[*slen + j + 3] != NUL
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2252 && tp[*slen + j + 4] != NUL))
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2253 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2254 )
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2255 *slen += j;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2256 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2257 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2258 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2259 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2260
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2261 if (key_name[0] == KS_URXVT_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2262 || key_name[0] == KS_SGR_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2263 || key_name[0] == KS_SGR_MOUSE_RELEASE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2264 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2265 // URXVT 1015 mouse reporting mode:
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2266 // Almost identical to xterm mouse mode, except the values are decimal
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2267 // instead of bytes.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2268 //
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2269 // \033[%d;%d;%dM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2270 // ^-- row
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2271 // ^----- column
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2272 // ^-------- code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2273 //
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2274 // SGR 1006 mouse reporting mode:
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2275 // Almost identical to xterm mouse mode, except the values are decimal
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2276 // instead of bytes.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2277 //
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2278 // \033[<%d;%d;%dM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2279 // ^-- row
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2280 // ^----- column
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2281 // ^-------- code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2282 //
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28773
diff changeset
2283 // \033[<%d;%d;%dm : mouse release event
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2284 // ^-- row
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2285 // ^----- column
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2286 // ^-------- code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2287 p = modifiers_start;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2288 if (p == NULL)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2289 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2290
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2291 mouse_code = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2292 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2293 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2294
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2295 // when mouse reporting is SGR, add 32 to mouse code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2296 if (key_name[0] == KS_SGR_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2297 || key_name[0] == KS_SGR_MOUSE_RELEASE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2298 mouse_code += 32;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2299
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2300 mouse_col = getdigits(&p) - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2301 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2302 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2303
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2304 mouse_row = getdigits(&p) - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2305
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2306 // The modifiers were the mouse coordinates, not the modifier keys
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2307 // (alt/shift/ctrl/meta) state.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2308 *modifiers = 0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2309 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2310
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2311 if (key_name[0] == KS_SGR_MOUSE
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2312 || key_name[0] == KS_SGR_MOUSE_RELEASE)
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2313 {
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2314 if (key_name[0] == KS_SGR_MOUSE_RELEASE)
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2315 {
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2316 is_release = TRUE;
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2317 // This is used below to set held_button.
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2318 mouse_code |= MOUSE_RELEASE;
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2319 }
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2320 }
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2321 else
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2322 {
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2323 release_is_ambiguous = TRUE;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2324 if ((mouse_code & MOUSE_RELEASE) == MOUSE_RELEASE)
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2325 is_release = TRUE;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2326 }
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2327
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2328 if (key_name[0] == KS_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2329 # ifdef FEAT_MOUSE_GPM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2330 || key_name[0] == KS_GPM_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2331 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2332 # ifdef FEAT_MOUSE_URXVT
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2333 || key_name[0] == KS_URXVT_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2334 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2335 || key_name[0] == KS_SGR_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2336 || key_name[0] == KS_SGR_MOUSE_RELEASE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2337 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2338 # if !defined(MSWIN)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2339 /*
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2340 * Handle old style mouse events.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2341 * Recognize the xterm mouse wheel, but not in the GUI, the
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2342 * Linux console with GPM and the MS-DOS or Win32 console
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2343 * (multi-clicks use >= 0x60).
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2344 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2345 if (mouse_code >= MOUSEWHEEL_LOW
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2346 # ifdef FEAT_GUI
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2347 && !gui.in_use
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2348 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2349 # ifdef FEAT_MOUSE_GPM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2350 && key_name[0] != KS_GPM_MOUSE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2351 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2352 )
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2353 {
18354
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
2354 # if defined(UNIX)
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2355 if (use_xterm_mouse() > 1 && mouse_code >= 0x80)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2356 // mouse-move event, using MOUSE_DRAG works
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2357 mouse_code = MOUSE_DRAG;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2358 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2359 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2360 // Keep the mouse_code before it's changed, so that we
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2361 // remember that it was a mouse wheel click.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2362 wheel_code = mouse_code;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2363 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2364 # ifdef FEAT_MOUSE_XTERM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2365 else if (held_button == MOUSE_RELEASE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2366 # ifdef FEAT_GUI
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2367 && !gui.in_use
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2368 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2369 && (mouse_code == 0x23 || mouse_code == 0x24
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2370 || mouse_code == 0x40 || mouse_code == 0x41))
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2371 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2372 // Apparently 0x23 and 0x24 are used by rxvt scroll wheel.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2373 // And 0x40 and 0x41 are used by some xterm emulator.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2374 wheel_code = mouse_code - (mouse_code >= 0x40 ? 0x40 : 0x23)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2375 + MOUSEWHEEL_LOW;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2376 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2377 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2378
18354
9f51d0cef8da patch 8.1.2171: mouse support not always available
Bram Moolenaar <Bram@vim.org>
parents: 18150
diff changeset
2379 # if defined(UNIX)
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2380 else if (use_xterm_mouse() > 1)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2381 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2382 if (mouse_code & MOUSE_DRAG_XTERM)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2383 mouse_code |= MOUSE_DRAG;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2384 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2385 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2386 # ifdef FEAT_XCLIPBOARD
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2387 else if (!(mouse_code & MOUSE_DRAG & ~MOUSE_CLICK_MASK))
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2388 {
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2389 if (is_release)
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2390 stop_xterm_trace();
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2391 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2392 start_xterm_trace(mouse_code);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2393 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2394 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2395 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2396 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2397 # endif // !UNIX || FEAT_MOUSE_XTERM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2398 # ifdef FEAT_MOUSE_NET
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2399 if (key_name[0] == KS_NETTERM_MOUSE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2400 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2401 int mc, mr;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2402
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2403 // expect a rather limited sequence like: balancing {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2404 // \033}6,45\r
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2405 // '6' is the row, 45 is the column
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2406 p = tp + *slen;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2407 mr = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2408 if (*p++ != ',')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2409 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2410 mc = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2411 if (*p++ != '\r')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2412 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2413
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2414 mouse_col = mc - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2415 mouse_row = mr - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2416 mouse_code = MOUSE_LEFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2417 *slen += (int)(p - (tp + *slen));
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2418 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2419 # endif // FEAT_MOUSE_NET
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2420 # ifdef FEAT_MOUSE_JSB
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2421 if (key_name[0] == KS_JSBTERM_MOUSE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2422 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2423 int mult, val, iter, button, status;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2424
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2425 /*
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2426 * JSBTERM Input Model
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2427 * \033[0~zw uniq escape sequence
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2428 * (L-x) Left button pressed - not pressed x not reporting
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2429 * (M-x) Middle button pressed - not pressed x not reporting
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2430 * (R-x) Right button pressed - not pressed x not reporting
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2431 * (SDmdu) Single , Double click, m: mouse move, d: button down,
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2432 * u: button up
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2433 * ### X cursor position padded to 3 digits
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2434 * ### Y cursor position padded to 3 digits
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2435 * (s-x) SHIFT key pressed - not pressed x not reporting
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2436 * (c-x) CTRL key pressed - not pressed x not reporting
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2437 * \033\\ terminating sequence
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2438 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2439 p = tp + *slen;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2440 button = mouse_code = 0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2441 switch (*p++)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2442 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2443 case 'L': button = 1; break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2444 case '-': break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2445 case 'x': break; // ignore sequence
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2446 default: return -1; // Unknown Result
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2447 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2448 switch (*p++)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2449 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2450 case 'M': button |= 2; break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2451 case '-': break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2452 case 'x': break; // ignore sequence
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2453 default: return -1; // Unknown Result
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2454 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2455 switch (*p++)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2456 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2457 case 'R': button |= 4; break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2458 case '-': break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2459 case 'x': break; // ignore sequence
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2460 default: return -1; // Unknown Result
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2461 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2462 status = *p++;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2463 for (val = 0, mult = 100, iter = 0; iter < 3; iter++,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2464 mult /= 10, p++)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2465 if (*p >= '0' && *p <= '9')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2466 val += (*p - '0') * mult;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2467 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2468 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2469 mouse_col = val;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2470 for (val = 0, mult = 100, iter = 0; iter < 3; iter++,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2471 mult /= 10, p++)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2472 if (*p >= '0' && *p <= '9')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2473 val += (*p - '0') * mult;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2474 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2475 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2476 mouse_row = val;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2477 switch (*p++)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2478 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2479 case 's': button |= 8; break; // SHIFT key Pressed
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2480 case '-': break; // Not Pressed
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2481 case 'x': break; // Not Reporting
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2482 default: return -1; // Unknown Result
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2483 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2484 switch (*p++)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2485 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2486 case 'c': button |= 16; break; // CTRL key Pressed
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2487 case '-': break; // Not Pressed
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2488 case 'x': break; // Not Reporting
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2489 default: return -1; // Unknown Result
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2490 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2491 if (*p++ != '\033')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2492 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2493 if (*p++ != '\\')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2494 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2495 switch (status)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2496 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2497 case 'D': // Double Click
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2498 case 'S': // Single Click
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2499 if (button & 1) mouse_code |= MOUSE_LEFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2500 if (button & 2) mouse_code |= MOUSE_MIDDLE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2501 if (button & 4) mouse_code |= MOUSE_RIGHT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2502 if (button & 8) mouse_code |= MOUSE_SHIFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2503 if (button & 16) mouse_code |= MOUSE_CTRL;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2504 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2505 case 'm': // Mouse move
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2506 if (button & 1) mouse_code |= MOUSE_LEFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2507 if (button & 2) mouse_code |= MOUSE_MIDDLE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2508 if (button & 4) mouse_code |= MOUSE_RIGHT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2509 if (button & 8) mouse_code |= MOUSE_SHIFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2510 if (button & 16) mouse_code |= MOUSE_CTRL;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2511 if ((button & 7) != 0)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2512 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2513 held_button = mouse_code;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2514 mouse_code |= MOUSE_DRAG;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2515 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2516 is_drag = TRUE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2517 showmode();
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2518 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2519 case 'd': // Button Down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2520 if (button & 1) mouse_code |= MOUSE_LEFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2521 if (button & 2) mouse_code |= MOUSE_MIDDLE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2522 if (button & 4) mouse_code |= MOUSE_RIGHT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2523 if (button & 8) mouse_code |= MOUSE_SHIFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2524 if (button & 16) mouse_code |= MOUSE_CTRL;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2525 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2526 case 'u': // Button Up
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2527 is_release = TRUE;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2528 if (button & 1)
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2529 mouse_code |= MOUSE_LEFT;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2530 if (button & 2)
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2531 mouse_code |= MOUSE_MIDDLE;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2532 if (button & 4)
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2533 mouse_code |= MOUSE_RIGHT;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2534 if (button & 8)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2535 mouse_code |= MOUSE_SHIFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2536 if (button & 16)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2537 mouse_code |= MOUSE_CTRL;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2538 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2539 default: return -1; // Unknown Result
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2540 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2541
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2542 *slen += (p - (tp + *slen));
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2543 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2544 # endif // FEAT_MOUSE_JSB
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2545 # ifdef FEAT_MOUSE_DEC
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2546 if (key_name[0] == KS_DEC_MOUSE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2547 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2548 /*
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2549 * The DEC Locator Input Model
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2550 * Netterm delivers the code sequence:
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2551 * \033[2;4;24;80&w (left button down)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2552 * \033[3;0;24;80&w (left button up)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2553 * \033[6;1;24;80&w (right button down)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2554 * \033[7;0;24;80&w (right button up)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2555 * CSI Pe ; Pb ; Pr ; Pc ; Pp & w
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2556 * Pe is the event code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2557 * Pb is the button code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2558 * Pr is the row coordinate
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2559 * Pc is the column coordinate
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2560 * Pp is the third coordinate (page number)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2561 * Pe, the event code indicates what event caused this report
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2562 * The following event codes are defined:
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2563 * 0 - request, the terminal received an explicit request for a
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28773
diff changeset
2564 * locator report, but the locator is unavailable
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2565 * 1 - request, the terminal received an explicit request for a
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28773
diff changeset
2566 * locator report
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2567 * 2 - left button down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2568 * 3 - left button up
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2569 * 4 - middle button down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2570 * 5 - middle button up
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2571 * 6 - right button down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2572 * 7 - right button up
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2573 * 8 - fourth button down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2574 * 9 - fourth button up
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2575 * 10 - locator outside filter rectangle
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2576 * Pb, the button code, ASCII decimal 0-15 indicating which buttons are
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2577 * down if any. The state of the four buttons on the locator
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2578 * correspond to the low four bits of the decimal value, "1" means
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2579 * button depressed
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2580 * 0 - no buttons down,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2581 * 1 - right,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2582 * 2 - middle,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2583 * 4 - left,
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2584 * 8 - fourth
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2585 * Pr is the row coordinate of the locator position in the page,
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2586 * encoded as an ASCII decimal value. If Pr is omitted, the locator
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2587 * position is undefined (outside the terminal window for example).
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2588 * Pc is the column coordinate of the locator position in the page,
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2589 * encoded as an ASCII decimal value. If Pc is omitted, the locator
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2590 * position is undefined (outside the terminal window for example).
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2591 * Pp is the page coordinate of the locator position encoded as an
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2592 * ASCII decimal value. The page coordinate may be omitted if the
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2593 * locator is on page one (the default). We ignore it anyway.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2594 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2595 int Pe, Pb, Pr, Pc;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2596
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2597 p = tp + *slen;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2598
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2599 // get event status
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2600 Pe = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2601 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2602 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2603
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2604 // get button status
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2605 Pb = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2606 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2607 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2608
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2609 // get row status
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2610 Pr = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2611 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2612 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2613
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2614 // get column status
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2615 Pc = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2616
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2617 // the page parameter is optional
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2618 if (*p == ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2619 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2620 p++;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2621 (void)getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2622 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2623 if (*p++ != '&')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2624 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2625 if (*p++ != 'w')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2626 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2627
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2628 mouse_code = 0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2629 switch (Pe)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2630 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2631 case 0: return -1; // position request while unavailable
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2632 case 1: // a response to a locator position request includes
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2633 // the status of all buttons
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2634 Pb &= 7; // mask off and ignore fourth button
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2635 if (Pb & 4)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2636 mouse_code = MOUSE_LEFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2637 if (Pb & 2)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2638 mouse_code = MOUSE_MIDDLE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2639 if (Pb & 1)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2640 mouse_code = MOUSE_RIGHT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2641 if (Pb)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2642 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2643 held_button = mouse_code;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2644 mouse_code |= MOUSE_DRAG;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2645 WantQueryMouse = TRUE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2646 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2647 is_drag = TRUE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2648 showmode();
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2649 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2650 case 2: mouse_code = MOUSE_LEFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2651 WantQueryMouse = TRUE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2652 break;
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2653 case 3: mouse_code = MOUSE_LEFT;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2654 is_release = TRUE;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2655 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2656 case 4: mouse_code = MOUSE_MIDDLE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2657 WantQueryMouse = TRUE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2658 break;
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2659 case 5: mouse_code = MOUSE_MIDDLE;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2660 is_release = TRUE;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2661 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2662 case 6: mouse_code = MOUSE_RIGHT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2663 WantQueryMouse = TRUE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2664 break;
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2665 case 7: mouse_code = MOUSE_RIGHT;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2666 is_release = TRUE;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2667 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2668 case 8: return -1; // fourth button down
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2669 case 9: return -1; // fourth button up
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2670 case 10: return -1; // mouse outside of filter rectangle
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2671 default: return -1; // should never occur
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2672 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2673
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2674 mouse_col = Pc - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2675 mouse_row = Pr - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2676
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2677 *slen += (int)(p - (tp + *slen));
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2678 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2679 # endif // FEAT_MOUSE_DEC
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2680 # ifdef FEAT_MOUSE_PTERM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2681 if (key_name[0] == KS_PTERM_MOUSE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2682 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2683 int button, num_clicks, action;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2684
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2685 p = tp + *slen;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2686
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2687 action = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2688 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2689 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2690
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2691 mouse_row = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2692 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2693 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2694 mouse_col = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2695 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2696 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2697
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2698 button = getdigits(&p);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2699 mouse_code = 0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2700
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2701 switch (button)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2702 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2703 case 4: mouse_code = MOUSE_LEFT; break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2704 case 1: mouse_code = MOUSE_RIGHT; break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2705 case 2: mouse_code = MOUSE_MIDDLE; break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2706 default: return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2707 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2708
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2709 switch (action)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2710 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2711 case 31: // Initial press
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2712 if (*p++ != ';')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2713 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2714
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2715 num_clicks = getdigits(&p); // Not used
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2716 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2717
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2718 case 32: // Release
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2719 is_release = TRUE;
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2720 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2721
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2722 case 33: // Drag
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2723 held_button = mouse_code;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2724 mouse_code |= MOUSE_DRAG;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2725 break;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2726
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2727 default:
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2728 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2729 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2730
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2731 if (*p++ != 't')
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2732 return -1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2733
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2734 *slen += (p - (tp + *slen));
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2735 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2736 # endif // FEAT_MOUSE_PTERM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2737
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2738 // Interpret the mouse code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2739 current_button = (mouse_code & MOUSE_CLICK_MASK);
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2740 if (is_release)
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2741 current_button |= MOUSE_RELEASE;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2742
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2743 if (current_button == MOUSE_RELEASE
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2744 # ifdef FEAT_MOUSE_XTERM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2745 && wheel_code == 0
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2746 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2747 )
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2748 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2749 /*
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2750 * If we get a mouse drag or release event when there is no mouse
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2751 * button held down (held_button == MOUSE_RELEASE), produce a K_IGNORE
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2752 * below.
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2753 * (can happen when you hold down two buttons and then let them go, or
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2754 * click in the menu bar, but not on a menu, and drag into the text).
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2755 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2756 if ((mouse_code & MOUSE_DRAG) == MOUSE_DRAG)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2757 is_drag = TRUE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2758 current_button = held_button;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2759 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2760 else if (wheel_code == 0)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2761 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2762 # ifdef CHECK_DOUBLE_CLICK
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2763 # ifdef FEAT_MOUSE_GPM
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2764 /*
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2765 * Only for Unix, when GUI not active, we handle multi-clicks here, but
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2766 * not for GPM mouse events.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2767 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2768 # ifdef FEAT_GUI
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2769 if (key_name[0] != KS_GPM_MOUSE && !gui.in_use)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2770 # else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2771 if (key_name[0] != KS_GPM_MOUSE)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2772 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2773 # else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2774 # ifdef FEAT_GUI
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2775 if (!gui.in_use)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2776 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2777 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2778 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2779 /*
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2780 * Compute the time elapsed since the previous mouse click.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2781 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2782 gettimeofday(&mouse_time, NULL);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2783 if (orig_mouse_time.tv_sec == 0)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2784 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2785 /*
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2786 * Avoid computing the difference between mouse_time
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2787 * and orig_mouse_time for the first click, as the
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2788 * difference would be huge and would cause
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2789 * multiplication overflow.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2790 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2791 timediff = p_mouset;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2792 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2793 else
18691
fb07fe556e67 patch 8.1.2337: double-click time sometimes miscomputed
Bram Moolenaar <Bram@vim.org>
parents: 18658
diff changeset
2794 timediff = time_diff_ms(&orig_mouse_time, &mouse_time);
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2795 orig_mouse_time = mouse_time;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2796 if (mouse_code == orig_mouse_code
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2797 && timediff < p_mouset
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2798 && orig_num_clicks != 4
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2799 && orig_mouse_col == mouse_col
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2800 && orig_mouse_row == mouse_row
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2801 && (is_mouse_topline(curwin)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2802 // Double click in tab pages line also works
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2803 // when window contents changes.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2804 || (mouse_row == 0 && firstwin->w_winrow > 0))
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2805 )
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2806 ++orig_num_clicks;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2807 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2808 orig_num_clicks = 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2809 orig_mouse_col = mouse_col;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2810 orig_mouse_row = mouse_row;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2811 set_mouse_topline(curwin);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2812 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2813 # if defined(FEAT_GUI) || defined(FEAT_MOUSE_GPM)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2814 else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2815 orig_num_clicks = NUM_MOUSE_CLICKS(mouse_code);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2816 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2817 # else
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2818 orig_num_clicks = NUM_MOUSE_CLICKS(mouse_code);
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2819 # endif
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2820 is_click = TRUE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2821 orig_mouse_code = mouse_code;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2822 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2823 if (!is_drag)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2824 held_button = mouse_code & MOUSE_CLICK_MASK;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2825
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2826 /*
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2827 * Translate the actual mouse event into a pseudo mouse event.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2828 * First work out what modifiers are to be used.
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2829 */
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2830 if (orig_mouse_code & MOUSE_SHIFT)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2831 *modifiers |= MOD_MASK_SHIFT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2832 if (orig_mouse_code & MOUSE_CTRL)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2833 *modifiers |= MOD_MASK_CTRL;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2834 if (orig_mouse_code & MOUSE_ALT)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2835 *modifiers |= MOD_MASK_ALT;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2836 if (orig_num_clicks == 2)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2837 *modifiers |= MOD_MASK_2CLICK;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2838 else if (orig_num_clicks == 3)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2839 *modifiers |= MOD_MASK_3CLICK;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2840 else if (orig_num_clicks == 4)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2841 *modifiers |= MOD_MASK_4CLICK;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2842
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2843 // Work out our pseudo mouse event. Note that MOUSE_RELEASE gets added,
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2844 // then it's not mouse up/down.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2845 key_name[0] = KS_EXTRA;
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2846 if (wheel_code != 0 && (!is_release || release_is_ambiguous))
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2847 {
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2848 if (wheel_code & MOUSE_CTRL)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2849 *modifiers |= MOD_MASK_CTRL;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2850 if (wheel_code & MOUSE_ALT)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2851 *modifiers |= MOD_MASK_ALT;
21114
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2852
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2853 if (wheel_code & 1 && wheel_code & 2)
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2854 key_name[1] = (int)KE_MOUSELEFT;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2855 else if (wheel_code & 2)
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2856 key_name[1] = (int)KE_MOUSERIGHT;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2857 else if (wheel_code & 1)
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2858 key_name[1] = (int)KE_MOUSEUP;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2859 else
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2860 key_name[1] = (int)KE_MOUSEDOWN;
d0265fdadec9 patch 8.2.1108: mouse left-right scroll is not supported in terminal window
Bram Moolenaar <Bram@vim.org>
parents: 19526
diff changeset
2861
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2862 held_button = MOUSE_RELEASE;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2863 }
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2864 else
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2865 key_name[1] = get_pseudo_mouse_code(current_button, is_click, is_drag);
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2866
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2867
21271
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2868 // Make sure the mouse position is valid. Some terminals may return weird
51ff7e5abdda patch 8.2.1186: with SGR mouse codes balloon doesn't show up after click
Bram Moolenaar <Bram@vim.org>
parents: 21114
diff changeset
2869 // values.
18150
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2870 if (mouse_col >= Columns)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2871 mouse_col = Columns - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2872 if (mouse_row >= Rows)
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2873 mouse_row = Rows - 1;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2874
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2875 return 0;
0ec6521e9d80 patch 8.1.2070: mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents: 18141
diff changeset
2876 }
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2877
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2878 // Functions also used for popup windows.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2879
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2880 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2881 * Compute the buffer line position from the screen position "rowp" / "colp" in
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2882 * window "win".
21339
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2883 * "plines_cache" can be NULL (no cache) or an array with "Rows" entries that
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2884 * caches the plines_win() result from a previous call. Entry is zero if not
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2885 * computed yet. There must be no text or setting changes since the entry is
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2886 * put in the cache.
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2887 * Returns TRUE if the position is below the last line.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2888 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2889 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2890 mouse_comp_pos(
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2891 win_T *win,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2892 int *rowp,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2893 int *colp,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2894 linenr_T *lnump,
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2895 int *plines_cache)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2896 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2897 int col = *colp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2898 int row = *rowp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2899 linenr_T lnum;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2900 int retval = FALSE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2901 int off;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2902 int count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2903
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2904 #ifdef FEAT_RIGHTLEFT
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2905 if (win->w_p_rl)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2906 col = win->w_width - 1 - col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2907 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2908
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2909 lnum = win->w_topline;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2910
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2911 while (row > 0)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2912 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2913 int cache_idx = lnum - win->w_topline;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2914
21339
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2915 // Only "Rows" lines are cached, with folding we'll run out of entries
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2916 // and use the slow way.
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2917 if (plines_cache != NULL && cache_idx < Rows
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2918 && plines_cache[cache_idx] > 0)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2919 count = plines_cache[cache_idx];
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2920 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2921 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2922 #ifdef FEAT_DIFF
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2923 // Don't include filler lines in "count"
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2924 if (win->w_p_diff
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2925 # ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2926 && !hasFoldingWin(win, lnum, NULL, NULL, TRUE, NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2927 # endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2928 )
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2929 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2930 if (lnum == win->w_topline)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2931 row -= win->w_topfill;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2932 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2933 row -= diff_check_fill(win, lnum);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2934 count = plines_win_nofill(win, lnum, TRUE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2935 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2936 else
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2937 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2938 count = plines_win(win, lnum, TRUE);
21339
608f674c6035 patch 8.2.1220: memory access error when dragging a popup window
Bram Moolenaar <Bram@vim.org>
parents: 21271
diff changeset
2939 if (plines_cache != NULL && cache_idx < Rows)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2940 plines_cache[cache_idx] = count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2941 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2942 if (count > row)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2943 break; // Position is in this buffer line.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2944 #ifdef FEAT_FOLDING
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2945 (void)hasFoldingWin(win, lnum, NULL, &lnum, TRUE, NULL);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2946 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2947 if (lnum == win->w_buffer->b_ml.ml_line_count)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2948 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2949 retval = TRUE;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2950 break; // past end of file
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2951 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2952 row -= count;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2953 ++lnum;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2954 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2955
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2956 if (!retval)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2957 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2958 // Compute the column without wrapping.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2959 off = win_col_off(win) - win_col_off2(win);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2960 if (col < off)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2961 col = off;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2962 col += row * (win->w_width - off);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2963 // add skip column (for long wrapping line)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2964 col += win->w_skipcol;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2965 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2966
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2967 if (!win->w_p_wrap)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2968 col += win->w_leftcol;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2969
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2970 // skip line number and fold column in front of the line
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2971 col -= win_col_off(win);
22788
c8a4ad051d23 patch 8.2.1942: insufficient test coverage for the Netbeans interface
Bram Moolenaar <Bram@vim.org>
parents: 22176
diff changeset
2972 if (col <= 0)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2973 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2974 #ifdef FEAT_NETBEANS_INTG
22788
c8a4ad051d23 patch 8.2.1942: insufficient test coverage for the Netbeans interface
Bram Moolenaar <Bram@vim.org>
parents: 22176
diff changeset
2975 // if mouse is clicked on the gutter, then inform the netbeans server
c8a4ad051d23 patch 8.2.1942: insufficient test coverage for the Netbeans interface
Bram Moolenaar <Bram@vim.org>
parents: 22176
diff changeset
2976 if (*colp < win_col_off(win))
c8a4ad051d23 patch 8.2.1942: insufficient test coverage for the Netbeans interface
Bram Moolenaar <Bram@vim.org>
parents: 22176
diff changeset
2977 netbeans_gutter_click(lnum);
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2978 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2979 col = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2980 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2981
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2982 *colp = col;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2983 *rowp = row;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2984 *lnump = lnum;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2985 return retval;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2986 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2987
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2988 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2989 * Find the window at screen position "*rowp" and "*colp". The positions are
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2990 * updated to become relative to the top-left of the window.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2991 * When "popup" is FAIL_POPUP and the position is in a popup window then NULL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2992 * is returned. When "popup" is IGNORE_POPUP then do not even check popup
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2993 * windows.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2994 * Returns NULL when something is wrong.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2995 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2996 win_T *
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2997 mouse_find_win(int *rowp, int *colp, mouse_find_T popup UNUSED)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2998 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2999 frame_T *fp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3000 win_T *wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3001
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
3002 #ifdef FEAT_PROP_POPUP
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3003 win_T *pwp = NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3004
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3005 if (popup != IGNORE_POPUP)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3006 {
18613
fa995154904e patch 8.1.2300: redraw breaks going through list of popup windows
Bram Moolenaar <Bram@vim.org>
parents: 18508
diff changeset
3007 popup_reset_handled(POPUP_HANDLED_1);
fa995154904e patch 8.1.2300: redraw breaks going through list of popup windows
Bram Moolenaar <Bram@vim.org>
parents: 18508
diff changeset
3008 while ((wp = find_next_popup(TRUE, POPUP_HANDLED_1)) != NULL)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3009 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3010 if (*rowp >= wp->w_winrow && *rowp < wp->w_winrow + popup_height(wp)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3011 && *colp >= wp->w_wincol
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3012 && *colp < wp->w_wincol + popup_width(wp))
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3013 pwp = wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3014 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3015 if (pwp != NULL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3016 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3017 if (popup == FAIL_POPUP)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3018 return NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3019 *rowp -= pwp->w_winrow;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3020 *colp -= pwp->w_wincol;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3021 return pwp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3022 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3023 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3024 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3025
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3026 fp = topframe;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3027 *rowp -= firstwin->w_winrow;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3028 for (;;)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3029 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3030 if (fp->fr_layout == FR_LEAF)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3031 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3032 if (fp->fr_layout == FR_ROW)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3033 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3034 for (fp = fp->fr_child; fp->fr_next != NULL; fp = fp->fr_next)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3035 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3036 if (*colp < fp->fr_width)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3037 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3038 *colp -= fp->fr_width;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3039 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3040 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3041 else // fr_layout == FR_COL
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3042 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3043 for (fp = fp->fr_child; fp->fr_next != NULL; fp = fp->fr_next)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3044 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3045 if (*rowp < fp->fr_height)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3046 break;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3047 *rowp -= fp->fr_height;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3048 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3049 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3050 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3051 // When using a timer that closes a window the window might not actually
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3052 // exist.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3053 FOR_ALL_WINDOWS(wp)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3054 if (wp == fp->fr_win)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3055 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3056 #ifdef FEAT_MENU
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3057 *rowp -= wp->w_winbar_height;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3058 #endif
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3059 return wp;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3060 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3061 return NULL;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3062 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3063
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
3064 #if defined(NEED_VCOL2COL) || defined(FEAT_BEVAL) || defined(FEAT_PROP_POPUP) \
28073
f4115d080c1b patch 8.2.4561: build failure with some combination of features
Bram Moolenaar <Bram@vim.org>
parents: 28069
diff changeset
3065 || defined(FEAT_EVAL) || defined(PROTO)
18135
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3066 /*
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3067 * Convert a virtual (screen) column to a character column.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3068 * The first column is one.
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3069 */
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3070 int
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3071 vcol2col(win_T *wp, linenr_T lnum, int vcol)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3072 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3073 // try to advance to the specified column
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3074 int count = 0;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3075 char_u *ptr;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3076 char_u *line;
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3077
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3078 line = ptr = ml_get_buf(wp->w_buffer, lnum, FALSE);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3079 while (count < vcol && *ptr != NUL)
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3080 {
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3081 count += win_lbr_chartabsize(wp, line, ptr, count, NULL);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3082 MB_PTR_ADV(ptr);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3083 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3084 return (int)(ptr - line);
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3085 }
1868ec23360e patch 8.1.2062: the mouse code is spread out
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3086 #endif
18623
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3087
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3088 #if defined(FEAT_EVAL) || defined(PROTO)
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3089 void
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3090 f_getmousepos(typval_T *argvars UNUSED, typval_T *rettv)
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3091 {
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3092 dict_T *d;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3093 win_T *wp;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3094 int row = mouse_row;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3095 int col = mouse_col;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3096 varnumber_T winid = 0;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3097 varnumber_T winrow = 0;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3098 varnumber_T wincol = 0;
28069
236b80af9833 patch 8.2.4559: getmousepos() returns the screen column
Bram Moolenaar <Bram@vim.org>
parents: 28061
diff changeset
3099 linenr_T lnum = 0;
18623
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3100 varnumber_T column = 0;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3101
29175
755ab148288b patch 8.2.5107: some callers of rettv_list_alloc() check for not OK
Bram Moolenaar <Bram@vim.org>
parents: 28942
diff changeset
3102 if (rettv_dict_alloc(rettv) == FAIL)
18623
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3103 return;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3104 d = rettv->vval.v_dict;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3105
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3106 dict_add_number(d, "screenrow", (varnumber_T)mouse_row + 1);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3107 dict_add_number(d, "screencol", (varnumber_T)mouse_col + 1);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3108
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3109 wp = mouse_find_win(&row, &col, FIND_POPUP);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3110 if (wp != NULL)
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3111 {
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3112 int top_off = 0;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3113 int left_off = 0;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3114 int height = wp->w_height + wp->w_status_height;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3115
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18691
diff changeset
3116 #ifdef FEAT_PROP_POPUP
18623
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3117 if (WIN_IS_POPUP(wp))
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3118 {
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3119 top_off = popup_top_extra(wp);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3120 left_off = popup_left_extra(wp);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3121 height = popup_height(wp);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3122 }
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3123 #endif
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3124 if (row < height)
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3125 {
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3126 winid = wp->w_id;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3127 winrow = row + 1;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3128 wincol = col + 1;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3129 row -= top_off;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3130 col -= left_off;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3131 if (row >= 0 && row < wp->w_height && col >= 0 && col < wp->w_width)
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3132 {
28087
4c60e656e054 patch 8.2.4568: getmousepos() does not compute the column below the last line
Bram Moolenaar <Bram@vim.org>
parents: 28073
diff changeset
3133 (void)mouse_comp_pos(wp, &row, &col, &lnum, NULL);
4c60e656e054 patch 8.2.4568: getmousepos() does not compute the column below the last line
Bram Moolenaar <Bram@vim.org>
parents: 28073
diff changeset
3134 col = vcol2col(wp, lnum, col);
18623
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3135 column = col + 1;
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3136 }
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3137 }
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3138 }
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3139 dict_add_number(d, "winid", winid);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3140 dict_add_number(d, "winrow", winrow);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3141 dict_add_number(d, "wincol", wincol);
28069
236b80af9833 patch 8.2.4559: getmousepos() returns the screen column
Bram Moolenaar <Bram@vim.org>
parents: 28061
diff changeset
3142 dict_add_number(d, "line", (varnumber_T)lnum);
18623
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3143 dict_add_number(d, "column", column);
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3144 }
3089b422b9dc patch 8.1.2304: cannot get the mouse position when getting a mouse click
Bram Moolenaar <Bram@vim.org>
parents: 18613
diff changeset
3145 #endif