annotate src/ui.c @ 19750:aa674de6d813 v8.2.0431

patch 8.2.0431: some compilers don't support using e for Esc Commit: https://github.com/vim/vim/commit/56ba21a156c723d92a1929e2c500be7295efb0a8 Author: Bram Moolenaar <Bram@vim.org> Date: Mon Mar 23 19:17:29 2020 +0100 patch 8.2.0431: some compilers don't support using \e for Esc Problem: Some compilers don't support using \e for Esc. (Yegappan Lakshmanan) Solution: use \033 instead.
author Bram Moolenaar <Bram@vim.org>
date Mon, 23 Mar 2020 19:30:04 +0100
parents 0208534b8a84
children 00a1b89256ea
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10042
4aead6a9b7a9 commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47
Christian Brabandt <cb@256bit.org>
parents: 8643
diff changeset
1 /* vi:set ts=8 sts=4 sw=4 noet:
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3 * VIM - Vi IMproved by Bram Moolenaar
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5 * Do ":help uganda" in Vim to read copying and usage conditions.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6 * Do ":help credits" in Vim to see a list of people who contributed.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
7 * See README.txt for an overview of the Vim source code.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
8 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
10 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
11 * ui.c: functions that handle the user interface.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
12 * 1. Keyboard input stuff, and a bit of windowing stuff. These are called
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
13 * before the machine specific stuff (mch_*) so that we can call the GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
14 * stuff instead if the GUI is running.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
15 * 2. Clipboard stuff.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
16 * 3. Input buffer stuff.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
17 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
18
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
19 #include "vim.h"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
20
5136
28e6f5f88968 updated for version 7.3.1311
Bram Moolenaar <bram@vim.org>
parents: 5106
diff changeset
21 #ifdef FEAT_CYGWIN_WIN32_CLIPBOARD
28e6f5f88968 updated for version 7.3.1311
Bram Moolenaar <bram@vim.org>
parents: 5106
diff changeset
22 # define WIN32_LEAN_AND_MEAN
28e6f5f88968 updated for version 7.3.1311
Bram Moolenaar <bram@vim.org>
parents: 5106
diff changeset
23 # include <windows.h>
28e6f5f88968 updated for version 7.3.1311
Bram Moolenaar <bram@vim.org>
parents: 5106
diff changeset
24 # include "winclip.pro"
28e6f5f88968 updated for version 7.3.1311
Bram Moolenaar <bram@vim.org>
parents: 5106
diff changeset
25 #endif
28e6f5f88968 updated for version 7.3.1311
Bram Moolenaar <bram@vim.org>
parents: 5106
diff changeset
26
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
27 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
28 ui_write(char_u *s, int len)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
29 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
30 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
31 if (gui.in_use && !gui.dying && !gui.starting)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
32 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
33 gui_write(s, len);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
34 if (p_wd)
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
35 gui_wait_for_chars(p_wd, typebuf.tb_change_cnt);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
36 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
37 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
38 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
39 #ifndef NO_CONSOLE
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
40 // Don't output anything in silent mode ("ex -s") unless 'verbose' set
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
41 if (!(silent_mode && p_verbose == 0))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
42 {
15868
7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15665
diff changeset
43 #if !defined(MSWIN)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
44 char_u *tofree = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
45
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
46 if (output_conv.vc_type != CONV_NONE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
47 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
48 // Convert characters from 'encoding' to 'termencoding'.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
49 tofree = string_convert(&output_conv, s, &len);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
50 if (tofree != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
51 s = tofree;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
52 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
53 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
54
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
55 mch_write(s, len);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
56
15868
7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15665
diff changeset
57 # if !defined(MSWIN)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
58 if (output_conv.vc_type != CONV_NONE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
59 vim_free(tofree);
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
60 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
61 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
62 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
63 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
64
15868
7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15665
diff changeset
65 #if defined(UNIX) || defined(VMS) || defined(PROTO) || defined(MSWIN)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
66 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
67 * When executing an external program, there may be some typed characters that
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
68 * are not consumed by it. Give them back to ui_inchar() and they are stored
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
69 * here for the next call.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
70 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
71 static char_u *ta_str = NULL;
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
72 static int ta_off; // offset for next char to use when ta_str != NULL
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
73 static int ta_len; // length of ta_str when it's not NULL
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
74
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
75 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
76 ui_inchar_undo(char_u *s, int len)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
77 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
78 char_u *new;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
79 int newlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
80
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
81 newlen = len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
82 if (ta_str != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
83 newlen += ta_len - ta_off;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
84 new = alloc(newlen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
85 if (new != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
86 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
87 if (ta_str != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
88 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
89 mch_memmove(new, ta_str + ta_off, (size_t)(ta_len - ta_off));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
90 mch_memmove(new + ta_len - ta_off, s, (size_t)len);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
91 vim_free(ta_str);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
92 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
93 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
94 mch_memmove(new, s, (size_t)len);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
95 ta_str = new;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
96 ta_len = newlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
97 ta_off = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
98 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
99 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
100 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
101
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
102 /*
3877
cd6c420e31d6 updated for version 7.3.695
Bram Moolenaar <bram@vim.org>
parents: 3770
diff changeset
103 * ui_inchar(): low level input function.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
104 * Get characters from the keyboard.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
105 * Return the number of characters that are available.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
106 * If "wtime" == 0 do not wait for characters.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
107 * If "wtime" == -1 wait forever for characters.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
108 * If "wtime" > 0 wait "wtime" milliseconds for a character.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
109 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
110 * "tb_change_cnt" is the value of typebuf.tb_change_cnt if "buf" points into
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
111 * it. When typebuf.tb_change_cnt changes (e.g., when a message is received
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
112 * from a remote client) "buf" can no longer be used. "tb_change_cnt" is NULL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
113 * otherwise.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
114 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
115 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
116 ui_inchar(
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
117 char_u *buf,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
118 int maxlen,
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
119 long wtime, // don't use "time", MIPS cannot handle it
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
120 int tb_change_cnt)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
121 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
122 int retval = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
123
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
124 #if defined(FEAT_GUI) && (defined(UNIX) || defined(VMS))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
125 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
126 * Use the typeahead if there is any.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
127 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
128 if (ta_str != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
129 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
130 if (maxlen >= ta_len - ta_off)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
131 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
132 mch_memmove(buf, ta_str + ta_off, (size_t)ta_len);
13244
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
133 VIM_CLEAR(ta_str);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
134 return ta_len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
135 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
136 mch_memmove(buf, ta_str + ta_off, (size_t)maxlen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
137 ta_off += maxlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
138 return maxlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
139 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
140 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
141
170
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
142 #ifdef FEAT_PROFILE
791
98a88a884610 updated for version 7.0230
vimboss
parents: 761
diff changeset
143 if (do_profiling == PROF_YES && wtime != 0)
170
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
144 prof_inchar_enter();
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
145 #endif
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
146
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
147 #ifdef NO_CONSOLE_INPUT
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
148 // Don't wait for character input when the window hasn't been opened yet.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
149 // Do try reading, this works when redirecting stdin from a file.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
150 // Must return something, otherwise we'll loop forever. If we run into
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
151 // this very often we probably got stuck, exit Vim.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
152 if (no_console_input())
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
153 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
154 static int count = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
155
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
156 # ifndef NO_CONSOLE
15075
fd9c4b1a71aa patch 8.1.0548: crash when job callback unloads a buffer
Bram Moolenaar <Bram@vim.org>
parents: 15052
diff changeset
157 retval = mch_inchar(buf, maxlen, wtime, tb_change_cnt);
228
d97518d6b325 updated for version 7.0063
vimboss
parents: 170
diff changeset
158 if (retval > 0 || typebuf_changed(tb_change_cnt) || wtime >= 0)
170
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
159 goto theend;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
160 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
161 if (wtime == -1 && ++count == 1000)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
162 read_error_exit();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
163 buf[0] = CAR;
170
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
164 retval = 1;
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
165 goto theend;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
166 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
167 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
168
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
169 // If we are going to wait for some time or block...
1086
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
170 if (wtime == -1 || wtime > 100L)
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
171 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
172 // ... allow signals to kill us.
1086
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
173 (void)vim_handle_signal(SIGNAL_UNBLOCK);
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
174
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
175 // ... there is no need for CTRL-C to interrupt something, don't let
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
176 // it set got_int when it was mapped.
6491
8cfbc34ae4aa updated for version 7.4.573
Bram Moolenaar <bram@vim.org>
parents: 6482
diff changeset
177 if ((mapped_ctrl_c | curbuf->b_mapped_ctrl_c) & get_real_state())
1086
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
178 ctrl_c_interrupts = FALSE;
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
179 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
180
15653
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
181 /*
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
182 * Here we call gui_inchar() or mch_inchar(), the GUI or machine-dependent
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
183 * input function. The functionality they implement is like this:
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
184 *
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
185 * while (not timed out)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
186 * {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
187 * handle-resize;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
188 * parse-queued-messages;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
189 * if (waited for 'updatetime')
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
190 * trigger-cursorhold;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
191 * ui_wait_for_chars_or_timer()
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
192 * if (character available)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
193 * break;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
194 * }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
195 *
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
196 * ui_wait_for_chars_or_timer() does:
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
197 *
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
198 * while (not timed out)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
199 * {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
200 * if (any-timer-triggered)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
201 * invoke-timer-callback;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
202 * wait-for-character();
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
203 * if (character available)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
204 * break;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
205 * }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
206 *
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
207 * wait-for-character() does:
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
208 * while (not timed out)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
209 * {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
210 * Wait for event;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
211 * if (something on channel)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
212 * read/write channel;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
213 * else if (resized)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
214 * handle_resize();
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
215 * else if (system event)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
216 * deal-with-system-event;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
217 * else if (character available)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
218 * break;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
219 * }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
220 *
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
221 */
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
222
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
223 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
224 if (gui.in_use)
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
225 retval = gui_inchar(buf, maxlen, wtime, tb_change_cnt);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
226 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
227 #ifndef NO_CONSOLE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
228 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
229 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
230 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
231 retval = mch_inchar(buf, maxlen, wtime, tb_change_cnt);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
232 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
233
1086
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
234 if (wtime == -1 || wtime > 100L)
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
235 // block SIGHUP et al.
1086
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
236 (void)vim_handle_signal(SIGNAL_BLOCK);
1a511b7b69eb updated for version 7.0-212
vimboss
parents: 944
diff changeset
237
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
238 ctrl_c_interrupts = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
239
170
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
240 #ifdef NO_CONSOLE_INPUT
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
241 theend:
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
242 #endif
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
243 #ifdef FEAT_PROFILE
791
98a88a884610 updated for version 7.0230
vimboss
parents: 761
diff changeset
244 if (do_profiling == PROF_YES && wtime != 0)
170
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
245 prof_inchar_exit();
8c60f65311fa updated for version 7.0052
vimboss
parents: 169
diff changeset
246 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
247 return retval;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
248 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
249
18896
4481f3b29fc5 patch 8.2.0009: VMS: terminal version doesn't build
Bram Moolenaar <Bram@vim.org>
parents: 18880
diff changeset
250 #if defined(UNIX) || defined(VMS) || defined(FEAT_GUI) || defined(PROTO)
15653
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
251 /*
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
252 * Common code for mch_inchar() and gui_inchar(): Wait for a while or
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
253 * indefinitely until characters are available, dealing with timers and
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
254 * messages on channels.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
255 *
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
256 * "buf" may be NULL if the available characters are not to be returned, only
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
257 * check if they are available.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
258 *
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
259 * Return the number of characters that are available.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
260 * If "wtime" == 0 do not wait for characters.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
261 * If "wtime" == n wait a short time for characters.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
262 * If "wtime" == -1 wait forever for characters.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
263 */
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
264 int
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
265 inchar_loop(
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
266 char_u *buf,
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
267 int maxlen,
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
268 long wtime, // don't use "time", MIPS cannot handle it
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
269 int tb_change_cnt,
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
270 int (*wait_func)(long wtime, int *interrupted, int ignore_input),
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
271 int (*resize_func)(int check_only))
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
272 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
273 int len;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
274 int interrupted = FALSE;
15665
31367ce5aac7 patch 8.1.0840: getchar(0) never returns a character in the terminal
Bram Moolenaar <Bram@vim.org>
parents: 15655
diff changeset
275 int did_call_wait_func = FALSE;
15653
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
276 int did_start_blocking = FALSE;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
277 long wait_time;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
278 long elapsed_time = 0;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
279 #ifdef ELAPSED_FUNC
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
280 elapsed_T start_tv;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
281
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
282 ELAPSED_INIT(start_tv);
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
283 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
284
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
285 // repeat until we got a character or waited long enough
15653
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
286 for (;;)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
287 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
288 // Check if window changed size while we were busy, perhaps the ":set
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
289 // columns=99" command was used.
15653
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
290 if (resize_func != NULL)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
291 resize_func(FALSE);
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
292
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
293 #ifdef MESSAGE_QUEUE
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
294 // Only process messages when waiting.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
295 if (wtime != 0)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
296 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
297 parse_queued_messages();
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
298 // If input was put directly in typeahead buffer bail out here.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
299 if (typebuf_changed(tb_change_cnt))
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
300 return 0;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
301 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
302 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
303 if (wtime < 0 && did_start_blocking)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
304 // blocking and already waited for p_ut
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
305 wait_time = -1;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
306 else
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
307 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
308 if (wtime >= 0)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
309 wait_time = wtime;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
310 else
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
311 // going to block after p_ut
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
312 wait_time = p_ut;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
313 #ifdef ELAPSED_FUNC
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
314 elapsed_time = ELAPSED_FUNC(start_tv);
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
315 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
316 wait_time -= elapsed_time;
15665
31367ce5aac7 patch 8.1.0840: getchar(0) never returns a character in the terminal
Bram Moolenaar <Bram@vim.org>
parents: 15655
diff changeset
317
31367ce5aac7 patch 8.1.0840: getchar(0) never returns a character in the terminal
Bram Moolenaar <Bram@vim.org>
parents: 15655
diff changeset
318 // If the waiting time is now zero or less, we timed out. However,
31367ce5aac7 patch 8.1.0840: getchar(0) never returns a character in the terminal
Bram Moolenaar <Bram@vim.org>
parents: 15655
diff changeset
319 // loop at least once to check for characters and events. Matters
31367ce5aac7 patch 8.1.0840: getchar(0) never returns a character in the terminal
Bram Moolenaar <Bram@vim.org>
parents: 15655
diff changeset
320 // when "wtime" is zero.
31367ce5aac7 patch 8.1.0840: getchar(0) never returns a character in the terminal
Bram Moolenaar <Bram@vim.org>
parents: 15655
diff changeset
321 if (wait_time <= 0 && did_call_wait_func)
15653
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
322 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
323 if (wtime >= 0)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
324 // no character available within "wtime"
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
325 return 0;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
326
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
327 // No character available within 'updatetime'.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
328 did_start_blocking = TRUE;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
329 if (trigger_cursorhold() && maxlen >= 3
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
330 && !typebuf_changed(tb_change_cnt))
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
331 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
332 // Put K_CURSORHOLD in the input buffer or return it.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
333 if (buf == NULL)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
334 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
335 char_u ibuf[3];
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
336
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
337 ibuf[0] = CSI;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
338 ibuf[1] = KS_EXTRA;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
339 ibuf[2] = (int)KE_CURSORHOLD;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
340 add_to_input_buf(ibuf, 3);
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
341 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
342 else
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
343 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
344 buf[0] = K_SPECIAL;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
345 buf[1] = KS_EXTRA;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
346 buf[2] = (int)KE_CURSORHOLD;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
347 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
348 return 3;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
349 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
350
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
351 // There is no character available within 'updatetime' seconds:
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
352 // flush all the swap files to disk. Also done when
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
353 // interrupted by SIGWINCH.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
354 before_blocking();
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
355 continue;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
356 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
357 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
358
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
359 #ifdef FEAT_JOB_CHANNEL
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
360 if (wait_time < 0 || wait_time > 100L)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
361 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
362 // Checking if a job ended requires polling. Do this at least
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
363 // every 100 msec.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
364 if (has_pending_job())
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
365 wait_time = 100L;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
366
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
367 // If there is readahead then parse_queued_messages() timed out and
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
368 // we should call it again soon.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
369 if (channel_any_readahead())
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
370 wait_time = 10L;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
371 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
372 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
373 #ifdef FEAT_BEVAL_GUI
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
374 if (p_beval && wait_time > 100L)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
375 // The 'balloonexpr' may indirectly invoke a callback while waiting
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
376 // for a character, need to check often.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
377 wait_time = 100L;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
378 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
379
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
380 // Wait for a character to be typed or another event, such as the winch
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
381 // signal or an event on the monitored file descriptors.
15665
31367ce5aac7 patch 8.1.0840: getchar(0) never returns a character in the terminal
Bram Moolenaar <Bram@vim.org>
parents: 15655
diff changeset
382 did_call_wait_func = TRUE;
15653
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
383 if (wait_func(wait_time, &interrupted, FALSE))
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
384 {
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
385 // If input was put directly in typeahead buffer bail out here.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
386 if (typebuf_changed(tb_change_cnt))
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
387 return 0;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
388
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
389 // We might have something to return now.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
390 if (buf == NULL)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
391 // "buf" is NULL, we were just waiting, not actually getting
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
392 // input.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
393 return input_available();
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
394
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
395 len = read_from_input_buf(buf, (long)maxlen);
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
396 if (len > 0)
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
397 return len;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
398 continue;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
399 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
400 // Timed out or interrupted with no character available.
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
401
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
402 #ifndef ELAPSED_FUNC
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
403 // estimate the elapsed time
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
404 elapsed_time += wait_time;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
405 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
406
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
407 if ((resize_func != NULL && resize_func(TRUE))
15655
2202ab00e9f9 patch 8.1.0835: GUI build fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 15653
diff changeset
408 #if defined(FEAT_CLIENTSERVER) && defined(UNIX)
15653
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
409 || server_waiting()
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
410 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
411 #ifdef MESSAGE_QUEUE
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
412 || interrupted
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
413 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
414 || wait_time > 0
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
415 || (wtime < 0 && !did_start_blocking))
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
416 // no character available, but something to be done, keep going
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
417 continue;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
418
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
419 // no character available or interrupted, return zero
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
420 break;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
421 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
422 return 0;
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
423 }
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
424 #endif
59a1ff689b4d patch 8.1.0834: GUI may wait too long before dealing with messages
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
425
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
426 #if defined(FEAT_TIMERS) || defined(PROTO)
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
427 /*
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
428 * Wait for a timer to fire or "wait_func" to return non-zero.
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
429 * Returns OK when something was read.
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
430 * Returns FAIL when it timed out or was interrupted.
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
431 */
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
432 int
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
433 ui_wait_for_chars_or_timer(
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
434 long wtime,
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
435 int (*wait_func)(long wtime, int *interrupted, int ignore_input),
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
436 int *interrupted,
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
437 int ignore_input)
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
438 {
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
439 int due_time;
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
440 long remaining = wtime;
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
441 int tb_change_cnt = typebuf.tb_change_cnt;
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
442 # ifdef FEAT_JOB_CHANNEL
15506
8b508af36a80 patch 8.1.0761: default value for brief_wait is wrong
Bram Moolenaar <Bram@vim.org>
parents: 15470
diff changeset
443 int brief_wait = FALSE;
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
444 # endif
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
445
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
446 // When waiting very briefly don't trigger timers.
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
447 if (wtime >= 0 && wtime < 10L)
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
448 return wait_func(wtime, NULL, ignore_input);
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
449
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
450 while (wtime < 0 || remaining > 0)
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
451 {
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
452 // Trigger timers and then get the time in wtime until the next one is
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
453 // due. Wait up to that time.
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
454 due_time = check_due_timer();
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
455 if (typebuf.tb_change_cnt != tb_change_cnt)
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
456 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
457 // timer may have used feedkeys()
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
458 return FAIL;
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
459 }
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
460 if (due_time <= 0 || (wtime > 0 && due_time > remaining))
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
461 due_time = remaining;
17708
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
462 # if defined(FEAT_JOB_CHANNEL) || defined(FEAT_SOUND_CANBERRA)
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
463 if ((due_time < 0 || due_time > 10L) && (
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
464 # if defined(FEAT_JOB_CHANNEL)
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
465 (
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
466 # if defined(FEAT_GUI)
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
467 !gui.in_use &&
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
468 # endif
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
469 (has_pending_job() || channel_any_readahead()))
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
470 # ifdef FEAT_SOUND_CANBERRA
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
471 ||
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
472 # endif
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
473 # endif
17708
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
474 # ifdef FEAT_SOUND_CANBERRA
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
475 has_any_sound_callback()
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
476 # endif
10696f279e20 patch 8.1.1851: crash when sound_playfile() callback plays sound
Bram Moolenaar <Bram@vim.org>
parents: 17580
diff changeset
477 ))
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
478 {
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
479 // There is a pending job or channel, should return soon in order
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
480 // to handle them ASAP. Do check for input briefly.
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
481 due_time = 10L;
18021
e273e489acdf patch 8.1.2006: build failure with huge features but without channel feature
Bram Moolenaar <Bram@vim.org>
parents: 17950
diff changeset
482 # ifdef FEAT_JOB_CHANNEL
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
483 brief_wait = TRUE;
18021
e273e489acdf patch 8.1.2006: build failure with huge features but without channel feature
Bram Moolenaar <Bram@vim.org>
parents: 17950
diff changeset
484 # endif
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
485 }
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
486 # endif
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
487 if (wait_func(due_time, interrupted, ignore_input))
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
488 return OK;
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
489 if ((interrupted != NULL && *interrupted)
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
490 # ifdef FEAT_JOB_CHANNEL
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
491 || brief_wait
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
492 # endif
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
493 )
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
494 // Nothing available, but need to return so that side effects get
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
495 // handled, such as handling a message on a channel.
13150
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 13060
diff changeset
496 return FAIL;
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
497 if (wtime > 0)
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
498 remaining -= due_time;
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
499 }
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
500 return FAIL;
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
501 }
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
502 #endif
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
503
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
504 /*
15404
440e5071f3f8 patch 8.1.0710: when using timers may wait for job exit quite long
Bram Moolenaar <Bram@vim.org>
parents: 15075
diff changeset
505 * Return non-zero if a character is available.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
506 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
507 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
508 ui_char_avail(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
509 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
510 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
511 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
512 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
513 gui_mch_update();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
514 return input_available();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
515 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
516 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
517 #ifndef NO_CONSOLE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
518 # ifdef NO_CONSOLE_INPUT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
519 if (no_console_input())
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
520 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
521 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
522 return mch_char_avail();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
523 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
524 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
525 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
526 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
527
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
528 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
529 * Delay for the given number of milliseconds. If ignoreinput is FALSE then we
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
530 * cancel the delay if a key is hit.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
531 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
532 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
533 ui_delay(long msec, int ignoreinput)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
534 {
18642
bbea1f108187 patch 8.1.2313: debugging where a delay comes from is not easy
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
535 #ifdef FEAT_JOB_CHANNEL
bbea1f108187 patch 8.1.2313: debugging where a delay comes from is not easy
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
536 ch_log(NULL, "ui_delay(%ld)", msec);
bbea1f108187 patch 8.1.2313: debugging where a delay comes from is not easy
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
537 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
538 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
539 if (gui.in_use && !ignoreinput)
13060
1bdc12630fc0 patch 8.0.1405: duplicated code for getting a typed character
Christian Brabandt <cb@256bit.org>
parents: 12924
diff changeset
540 gui_wait_for_chars(msec, typebuf.tb_change_cnt);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
541 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
542 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
543 mch_delay(msec, ignoreinput);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
544 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
545
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
546 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
547 * If the machine has job control, use it to suspend the program,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
548 * otherwise fake it by starting a new shell.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
549 * When running the GUI iconify the window.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
550 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
551 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
552 ui_suspend(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
553 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
554 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
555 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
556 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
557 gui_mch_iconify();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
558 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
559 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
560 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
561 mch_suspend();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
562 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
563
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
564 #if !defined(UNIX) || !defined(SIGTSTP) || defined(PROTO) || defined(__BEOS__)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
565 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
566 * When the OS can't really suspend, call this function to start a shell.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
567 * This is never called in the GUI.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
568 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
569 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
570 suspend_shell(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
571 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
572 if (*p_sh == NUL)
15470
55ccc2d353bd patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents: 15404
diff changeset
573 emsg(_(e_shellempty));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
574 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
575 {
15543
dd725a8ab112 patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15510
diff changeset
576 msg_puts(_("new shell started\n"));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
577 do_shell(NULL, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
578 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
579 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
580 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
581
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
582 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
583 * Try to get the current Vim shell size. Put the result in Rows and Columns.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
584 * Use the new sizes as defaults for 'columns' and 'lines'.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
585 * Return OK when size could be determined, FAIL otherwise.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
586 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
587 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
588 ui_get_shellsize(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
589 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
590 int retval;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
591
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
592 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
593 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
594 retval = gui_get_shellsize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
595 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
596 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
597 retval = mch_get_shellsize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
598
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
599 check_shellsize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
600
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
601 // adjust the default for 'lines' and 'columns'
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
602 if (retval == OK)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
603 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
604 set_number_default("lines", Rows);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
605 set_number_default("columns", Columns);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
606 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
607 return retval;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
608 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
609
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
610 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
611 * Set the size of the Vim shell according to Rows and Columns, if possible.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
612 * The gui_set_shellsize() or mch_set_shellsize() function will try to set the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
613 * new size. If this is not possible, it will adjust Rows and Columns.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
614 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
615 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
616 ui_set_shellsize(
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
617 int mustset UNUSED) // set by the user
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
618 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
619 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
620 if (gui.in_use)
5106
c3a82208e143 updated for version 7.3.1296
Bram Moolenaar <bram@vim.org>
parents: 5037
diff changeset
621 gui_set_shellsize(mustset, TRUE, RESIZE_BOTH);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
622 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
623 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
624 mch_set_shellsize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
625 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
626
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
627 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
628 * Called when Rows and/or Columns changed. Adjust scroll region and mouse
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
629 * region.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
630 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
631 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
632 ui_new_shellsize(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
633 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
634 if (full_screen && !exiting)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
635 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
636 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
637 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
638 gui_new_shellsize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
639 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
640 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
641 mch_new_shellsize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
642 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
643 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
644
16245
e0a6298bd70f patch 8.1.1127: getwinpos() doesn't work in terminal on MS-Windows console
Bram Moolenaar <Bram@vim.org>
parents: 16243
diff changeset
645 #if ((defined(FEAT_EVAL) || defined(FEAT_TERMINAL)) \
16243
3b79a3029947 patch 8.1.1126: build failure with +terminal but without tgetent
Bram Moolenaar <Bram@vim.org>
parents: 16241
diff changeset
646 && (defined(FEAT_GUI) \
16253
f28ef3d27f91 patch 8.1.1131: getwinpos() does not work in the MS-Windows console
Bram Moolenaar <Bram@vim.org>
parents: 16245
diff changeset
647 || defined(MSWIN) \
16243
3b79a3029947 patch 8.1.1126: build failure with +terminal but without tgetent
Bram Moolenaar <Bram@vim.org>
parents: 16241
diff changeset
648 || (defined(HAVE_TGETENT) && defined(FEAT_TERMRESPONSE)))) \
16241
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
649 || defined(PROTO)
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
650 /*
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
651 * Get the window position in pixels, if possible.
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
652 * Return FAIL when not possible.
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
653 */
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
654 int
18139
59bc3cd42cf5 patch 8.1.2064: MS-Windows: compiler warnings for unused arguments
Bram Moolenaar <Bram@vim.org>
parents: 18135
diff changeset
655 ui_get_winpos(int *x, int *y, varnumber_T timeout UNUSED)
16241
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
656 {
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
657 # ifdef FEAT_GUI
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
658 if (gui.in_use)
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
659 return gui_mch_get_winpos(x, y);
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
660 # endif
16451
7ae2396cef62 patch 8.1.1230: a lot of code is shared between vim.exe and gvim.exe
Bram Moolenaar <Bram@vim.org>
parents: 16253
diff changeset
661 # if defined(MSWIN) && (!defined(FEAT_GUI) || defined(VIMDLL))
16253
f28ef3d27f91 patch 8.1.1131: getwinpos() does not work in the MS-Windows console
Bram Moolenaar <Bram@vim.org>
parents: 16245
diff changeset
662 return mch_get_winpos(x, y);
f28ef3d27f91 patch 8.1.1131: getwinpos() does not work in the MS-Windows console
Bram Moolenaar <Bram@vim.org>
parents: 16245
diff changeset
663 # else
f28ef3d27f91 patch 8.1.1131: getwinpos() does not work in the MS-Windows console
Bram Moolenaar <Bram@vim.org>
parents: 16245
diff changeset
664 # if defined(HAVE_TGETENT) && defined(FEAT_TERMRESPONSE)
16241
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
665 return term_get_winpos(x, y, timeout);
16253
f28ef3d27f91 patch 8.1.1131: getwinpos() does not work in the MS-Windows console
Bram Moolenaar <Bram@vim.org>
parents: 16245
diff changeset
666 # else
16245
e0a6298bd70f patch 8.1.1127: getwinpos() doesn't work in terminal on MS-Windows console
Bram Moolenaar <Bram@vim.org>
parents: 16243
diff changeset
667 return FAIL;
16253
f28ef3d27f91 patch 8.1.1131: getwinpos() does not work in the MS-Windows console
Bram Moolenaar <Bram@vim.org>
parents: 16245
diff changeset
668 # endif
16241
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
669 # endif
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
670 }
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
671 #endif
c1698187c482 patch 8.1.1125: libvterm does not handle the window position report
Bram Moolenaar <Bram@vim.org>
parents: 15967
diff changeset
672
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
673 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
674 ui_breakcheck(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
675 {
10240
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
676 ui_breakcheck_force(FALSE);
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
677 }
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
678
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
679 /*
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
680 * When "force" is true also check when the terminal is not in raw mode.
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
681 * This is useful to read input on channels.
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
682 */
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
683 void
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
684 ui_breakcheck_force(int force)
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
685 {
15052
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
686 static int recursive = FALSE;
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
687 int save_updating_screen = updating_screen;
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
688
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
689 // We could be called recursively if stderr is redirected, calling
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
690 // fill_input_buf() calls settmode() when stdin isn't a tty. settmode()
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
691 // calls vgetorpeek() which calls ui_breakcheck() again.
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
692 if (recursive)
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
693 return;
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
694 recursive = TRUE;
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
695
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
696 // We do not want gui_resize_shell() to redraw the screen here.
10771
abc27e523e2a patch 8.0.0275: the screen may be updated at the wrong time
Christian Brabandt <cb@256bit.org>
parents: 10240
diff changeset
697 ++updating_screen;
abc27e523e2a patch 8.0.0275: the screen may be updated at the wrong time
Christian Brabandt <cb@256bit.org>
parents: 10240
diff changeset
698
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
699 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
700 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
701 gui_mch_update();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
702 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
703 #endif
10240
175b1116f96a commit https://github.com/vim/vim/commit/b9c31e71f5a4653a27e81c21226039bfa35b9131
Christian Brabandt <cb@256bit.org>
parents: 10042
diff changeset
704 mch_breakcheck(force);
10771
abc27e523e2a patch 8.0.0275: the screen may be updated at the wrong time
Christian Brabandt <cb@256bit.org>
parents: 10240
diff changeset
705
14730
193471015e1a patch 8.1.0377: xdiff doesn't use the Vim memory allocation functions
Christian Brabandt <cb@256bit.org>
parents: 13888
diff changeset
706 if (save_updating_screen)
193471015e1a patch 8.1.0377: xdiff doesn't use the Vim memory allocation functions
Christian Brabandt <cb@256bit.org>
parents: 13888
diff changeset
707 updating_screen = TRUE;
13888
81e8e6181aeb patch 8.0.1815: crash with terminal window and with 'lazyredraw' set
Christian Brabandt <cb@256bit.org>
parents: 13876
diff changeset
708 else
16835
7cade95272c4 patch 8.1.1419: listener callbacks may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 16825
diff changeset
709 after_updating_screen(FALSE);
15052
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
710
35c2d164a630 patch 8.1.0537: ui_breakcheck() may be called recursively
Bram Moolenaar <Bram@vim.org>
parents: 14862
diff changeset
711 recursive = FALSE;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
712 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
713
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
714 //////////////////////////////////////////////////////////////////////////////
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
715 // Functions for copying and pasting text between applications.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
716 // This is always included in a GUI version, but may also be included when the
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
717 // clipboard and mouse is available to a terminal version such as xterm.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
718 // Note: there are some more functions in ops.c that handle selection stuff.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
719 //
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
720 // Also note that the majority of functions here deal with the X 'primary'
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
721 // (visible - for Visual mode use) selection, and only that. There are no
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
722 // versions of these for the 'clipboard' selection, as Visual mode has no use
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
723 // for them.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
724
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
725 #if defined(FEAT_CLIPBOARD) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
726
17789
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
727 static void clip_gen_lose_selection(Clipboard_T *cbd);
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
728 static int clip_gen_own_selection(Clipboard_T *cbd);
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
729 #if defined(FEAT_X11) && defined(FEAT_XCLIPBOARD) && defined(USE_SYSTEM)
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
730 static int clip_x11_owner_exists(Clipboard_T *cbd);
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
731 #endif
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
732
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
733 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
734 * Selection stuff using Visual mode, for cutting and pasting text to other
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
735 * windows.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
736 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
737
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
738 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
739 * Call this to initialise the clipboard. Pass it FALSE if the clipboard code
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
740 * is included, but the clipboard can not be used, or TRUE if the clipboard can
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
741 * be used. Eg unix may call this with FALSE, then call it again with TRUE if
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
742 * the GUI starts.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
743 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
744 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
745 clip_init(int can_use)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
746 {
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
747 Clipboard_T *cb;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
748
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
749 cb = &clip_star;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
750 for (;;)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
751 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
752 cb->available = can_use;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
753 cb->owned = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
754 cb->start.lnum = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
755 cb->start.col = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
756 cb->end.lnum = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
757 cb->end.col = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
758 cb->state = SELECT_CLEARED;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
759
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
760 if (cb == &clip_plus)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
761 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
762 cb = &clip_plus;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
763 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
764 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
765
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
766 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
767 * Check whether the VIsual area has changed, and if so try to become the owner
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
768 * of the selection, and free any old converted selection we may still have
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
769 * lying around. If the VIsual mode has ended, make a copy of what was
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
770 * selected so we can still give it to others. Will probably have to make sure
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
771 * this is called whenever VIsual mode is ended.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
772 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
773 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
774 clip_update_selection(Clipboard_T *clip)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
775 {
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
776 pos_T start, end;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
777
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
778 // If visual mode is only due to a redo command ("."), then ignore it
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
779 if (!redo_VIsual_busy && VIsual_active && (State & NORMAL))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
780 {
11121
778c10516955 patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 10771
diff changeset
781 if (LT_POS(VIsual, curwin->w_cursor))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
782 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
783 start = VIsual;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
784 end = curwin->w_cursor;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
785 if (has_mbyte)
474
a5fcf36ef512 updated for version 7.0127
vimboss
parents: 415
diff changeset
786 end.col += (*mb_ptr2len)(ml_get_cursor()) - 1;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
787 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
788 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
789 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
790 start = curwin->w_cursor;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
791 end = VIsual;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
792 }
11121
778c10516955 patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 10771
diff changeset
793 if (!EQUAL_POS(clip->start, start)
778c10516955 patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 10771
diff changeset
794 || !EQUAL_POS(clip->end, end)
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
795 || clip->vmode != VIsual_mode)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
796 {
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
797 clip_clear_selection(clip);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
798 clip->start = start;
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
799 clip->end = end;
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
800 clip->vmode = VIsual_mode;
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
801 clip_free_selection(clip);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
802 clip_own_selection(clip);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
803 clip_gen_set_selection(clip);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
804 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
805 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
806 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
807
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
808 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
809 clip_own_selection(Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
810 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
811 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
812 * Also want to check somehow that we are reading from the keyboard rather
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
813 * than a mapping etc.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
814 */
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
815 #ifdef FEAT_X11
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
816 // Always own the selection, we might have lost it without being
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
817 // notified, e.g. during a ":sh" command.
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
818 if (cbd->available)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
819 {
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
820 int was_owned = cbd->owned;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
821
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
822 cbd->owned = (clip_gen_own_selection(cbd) == OK);
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
823 if (!was_owned && (cbd == &clip_star || cbd == &clip_plus))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
824 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
825 // May have to show a different kind of highlighting for the
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
826 // selected area. There is no specific redraw command for this,
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
827 // just redraw all windows on the current buffer.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
828 if (cbd->owned
791
98a88a884610 updated for version 7.0230
vimboss
parents: 761
diff changeset
829 && (get_real_state() == VISUAL
98a88a884610 updated for version 7.0230
vimboss
parents: 761
diff changeset
830 || get_real_state() == SELECTMODE)
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
831 && (cbd == &clip_star ? clip_isautosel_star()
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
832 : clip_isautosel_plus())
11158
501f46f7644c patch 8.0.0466: still macros that should be all-caps
Christian Brabandt <cb@256bit.org>
parents: 11127
diff changeset
833 && HL_ATTR(HLF_V) != HL_ATTR(HLF_VNC))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
834 redraw_curbuf_later(INVERTED_ALL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
835 }
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
836 }
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
837 #else
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
838 // Only own the clipboard when we didn't own it yet.
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
839 if (!cbd->owned && cbd->available)
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
840 cbd->owned = (clip_gen_own_selection(cbd) == OK);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
841 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
842 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
843
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
844 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
845 clip_lose_selection(Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
846 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
847 #ifdef FEAT_X11
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
848 int was_owned = cbd->owned;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
849 #endif
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
850 int visual_selection = FALSE;
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
851
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
852 if (cbd == &clip_star || cbd == &clip_plus)
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
853 visual_selection = TRUE;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
854
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
855 clip_free_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
856 cbd->owned = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
857 if (visual_selection)
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
858 clip_clear_selection(cbd);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
859 clip_gen_lose_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
860 #ifdef FEAT_X11
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
861 if (visual_selection)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
862 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
863 // May have to show a different kind of highlighting for the selected
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
864 // area. There is no specific redraw command for this, just redraw all
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
865 // windows on the current buffer.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
866 if (was_owned
791
98a88a884610 updated for version 7.0230
vimboss
parents: 761
diff changeset
867 && (get_real_state() == VISUAL
98a88a884610 updated for version 7.0230
vimboss
parents: 761
diff changeset
868 || get_real_state() == SELECTMODE)
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
869 && (cbd == &clip_star ?
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
870 clip_isautosel_star() : clip_isautosel_plus())
11158
501f46f7644c patch 8.0.0466: still macros that should be all-caps
Christian Brabandt <cb@256bit.org>
parents: 11127
diff changeset
871 && HL_ATTR(HLF_V) != HL_ATTR(HLF_VNC))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
872 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
873 update_curbuf(INVERTED_ALL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
874 setcursor();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
875 cursor_on();
13150
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 13060
diff changeset
876 out_flush_cursor(TRUE, FALSE);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
877 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
878 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
879 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
880 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
881
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
882 static void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
883 clip_copy_selection(Clipboard_T *clip)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
884 {
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
885 if (VIsual_active && (State & NORMAL) && clip->available)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
886 {
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
887 clip_update_selection(clip);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
888 clip_free_selection(clip);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
889 clip_own_selection(clip);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
890 if (clip->owned)
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
891 clip_get_selection(clip);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
892 clip_gen_set_selection(clip);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
893 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
894 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
895
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
896 /*
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
897 * Save and restore clip_unnamed before doing possibly many changes. This
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
898 * prevents accessing the clipboard very often which might slow down Vim
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
899 * considerably.
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
900 */
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
901 static int global_change_count = 0; // if set, inside a start_global_changes
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
902 static int clipboard_needs_update = FALSE; // clipboard needs to be updated
11273
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
903 static int clip_did_set_selection = TRUE;
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
904
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
905 /*
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
906 * Save clip_unnamed and reset it.
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
907 */
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
908 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
909 start_global_changes(void)
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
910 {
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
911 if (++global_change_count > 1)
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
912 return;
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
913 clip_unnamed_saved = clip_unnamed;
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
914 clipboard_needs_update = FALSE;
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
915
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
916 if (clip_did_set_selection)
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
917 {
18498
9e6d5a4abb1c patch 8.1.2243: typos in comments
Bram Moolenaar <Bram@vim.org>
parents: 18139
diff changeset
918 clip_unnamed = 0;
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
919 clip_did_set_selection = FALSE;
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
920 }
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
921 }
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
922
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
923 /*
11273
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
924 * Return TRUE if setting the clipboard was postponed, it already contains the
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
925 * right text.
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
926 */
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
927 int
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
928 is_clipboard_needs_update()
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
929 {
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
930 return clipboard_needs_update;
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
931 }
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
932
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
933 /*
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
934 * Restore clip_unnamed and set the selection when needed.
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
935 */
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
936 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
937 end_global_changes(void)
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
938 {
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
939 if (--global_change_count > 0)
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
940 // recursive
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
941 return;
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
942 if (!clip_did_set_selection)
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
943 {
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
944 clip_did_set_selection = TRUE;
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
945 clip_unnamed = clip_unnamed_saved;
18498
9e6d5a4abb1c patch 8.1.2243: typos in comments
Bram Moolenaar <Bram@vim.org>
parents: 18139
diff changeset
946 clip_unnamed_saved = 0;
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
947 if (clipboard_needs_update)
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
948 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
949 // only store something in the clipboard,
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
950 // if we have yanked anything to it
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
951 if (clip_unnamed & CLIP_UNNAMED)
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
952 {
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
953 clip_own_selection(&clip_star);
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
954 clip_gen_set_selection(&clip_star);
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
955 }
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
956 if (clip_unnamed & CLIP_UNNAMED_PLUS)
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
957 {
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
958 clip_own_selection(&clip_plus);
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
959 clip_gen_set_selection(&clip_plus);
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
960 }
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
961 }
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
962 }
11273
96d83cd2904a patch 8.0.0522: Win32: when 'clipboard' is "unnamed" yyp does not work
Christian Brabandt <cb@256bit.org>
parents: 11158
diff changeset
963 clipboard_needs_update = FALSE;
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
964 }
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
965
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
966 /*
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
967 * Called when Visual mode is ended: update the selection.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
968 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
969 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
970 clip_auto_select(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
971 {
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
972 if (clip_isautosel_star())
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
973 clip_copy_selection(&clip_star);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
974 if (clip_isautosel_plus())
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
975 clip_copy_selection(&clip_plus);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
976 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
977
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
978 /*
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
979 * Return TRUE if automatic selection of Visual area is desired for the *
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
980 * register.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
981 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
982 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
983 clip_isautosel_star(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
984 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
985 return (
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
986 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
987 gui.in_use ? (vim_strchr(p_go, GO_ASEL) != NULL) :
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
988 #endif
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
989 clip_autoselect_star);
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
990 }
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
991
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
992 /*
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
993 * Return TRUE if automatic selection of Visual area is desired for the +
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
994 * register.
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
995 */
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
996 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
997 clip_isautosel_plus(void)
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
998 {
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
999 return (
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1000 #ifdef FEAT_GUI
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1001 gui.in_use ? (vim_strchr(p_go, GO_ASELPLUS) != NULL) :
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1002 #endif
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1003 clip_autoselect_plus);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1004 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1005
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1006
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1007 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1008 * Stuff for general mouse selection, without using Visual mode.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1009 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1010
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1011 static void clip_invert_area(Clipboard_T *, int, int, int, int, int how);
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1012 static void clip_invert_rectangle(Clipboard_T *, int row, int col, int height, int width, int invert);
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1013 static void clip_get_word_boundaries(Clipboard_T *, int, int);
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1014 static int clip_get_line_end(Clipboard_T *, int);
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1015 static void clip_update_modeless_selection(Clipboard_T *, int, int, int, int);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1016
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1017 // "how" flags for clip_invert_area()
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1018 #define CLIP_CLEAR 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1019 #define CLIP_SET 2
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1020 #define CLIP_TOGGLE 3
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1021
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1022 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1023 * Start, continue or end a modeless selection. Used when editing the
17051
221d4b82bc0b patch 8.1.1525: cannot move a popup window with the mouse
Bram Moolenaar <Bram@vim.org>
parents: 17041
diff changeset
1024 * command-line, in the cmdline window and when the mouse is in a popup window.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1025 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1026 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1027 clip_modeless(int button, int is_click, int is_drag)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1028 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1029 int repeat;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1030
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1031 repeat = ((clip_star.mode == SELECT_MODE_CHAR
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1032 || clip_star.mode == SELECT_MODE_LINE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1033 && (mod_mask & MOD_MASK_2CLICK))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1034 || (clip_star.mode == SELECT_MODE_WORD
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1035 && (mod_mask & MOD_MASK_3CLICK));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1036 if (is_click && button == MOUSE_RIGHT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1037 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1038 // Right mouse button: If there was no selection, start one.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1039 // Otherwise extend the existing selection.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1040 if (clip_star.state == SELECT_CLEARED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1041 clip_start_selection(mouse_col, mouse_row, FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1042 clip_process_selection(button, mouse_col, mouse_row, repeat);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1043 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1044 else if (is_click)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1045 clip_start_selection(mouse_col, mouse_row, repeat);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1046 else if (is_drag)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1047 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1048 // Don't try extending a selection if there isn't one. Happens when
19738
0208534b8a84 patch 8.2.0425: code for modeless selection not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19730
diff changeset
1049 // button-down is in the cmdline and then moving mouse upwards.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1050 if (clip_star.state != SELECT_CLEARED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1051 clip_process_selection(button, mouse_col, mouse_row, repeat);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1052 }
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1053 else // release
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1054 clip_process_selection(MOUSE_RELEASE, mouse_col, mouse_row, FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1055 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1056
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1057 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1058 * Compare two screen positions ala strcmp()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1059 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1060 static int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1061 clip_compare_pos(
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1062 int row1,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1063 int col1,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1064 int row2,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1065 int col2)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1066 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1067 if (row1 > row2) return(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1068 if (row1 < row2) return(-1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1069 if (col1 > col2) return(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1070 if (col1 < col2) return(-1);
8236
6d221d623c8e commit https://github.com/vim/vim/commit/9e34110816522b081feb65ed5b2f4ec03d290e30
Christian Brabandt <cb@256bit.org>
parents: 7850
diff changeset
1071 return(0);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1072 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1073
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1074 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1075 * Start the selection
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1076 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1077 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1078 clip_start_selection(int col, int row, int repeated_click)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1079 {
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1080 Clipboard_T *cb = &clip_star;
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1081 #ifdef FEAT_PROP_POPUP
17578
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1082 win_T *wp;
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1083 int row_cp = row;
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1084 int col_cp = col;
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1085
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1086 wp = mouse_find_win(&row_cp, &col_cp, FIND_POPUP);
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1087 if (wp != NULL && WIN_IS_POPUP(wp)
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1088 && popup_is_in_scrollbar(wp, row_cp, col_cp))
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1089 // click or double click in scrollbar does not start a selection
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1090 return;
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1091 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1092
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1093 if (cb->state == SELECT_DONE)
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1094 clip_clear_selection(cb);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1095
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1096 row = check_row(row);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1097 col = check_col(col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1098 col = mb_fix_col(col, row);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1099
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1100 cb->start.lnum = row;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1101 cb->start.col = col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1102 cb->end = cb->start;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1103 cb->origin_row = (short_u)cb->start.lnum;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1104 cb->state = SELECT_IN_PROGRESS;
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1105 #ifdef FEAT_PROP_POPUP
17578
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1106 if (wp != NULL && WIN_IS_POPUP(wp))
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1107 {
17578
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1108 // Click in a popup window restricts selection to that window,
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1109 // excluding the border.
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1110 cb->min_col = wp->w_wincol + wp->w_popup_border[3];
17754
65b89c9eb946 patch 8.1.1874: modeless selection in popup window overlaps scrollbar
Bram Moolenaar <Bram@vim.org>
parents: 17748
diff changeset
1111 cb->max_col = wp->w_wincol + popup_width(wp)
65b89c9eb946 patch 8.1.1874: modeless selection in popup window overlaps scrollbar
Bram Moolenaar <Bram@vim.org>
parents: 17748
diff changeset
1112 - wp->w_popup_border[1] - wp->w_has_scrollbar;
17748
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1113 if (cb->max_col > screen_Columns)
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1114 cb->max_col = screen_Columns;
17578
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1115 cb->min_row = wp->w_winrow + wp->w_popup_border[0];
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1116 cb->max_row = wp->w_winrow + popup_height(wp) - 1
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1117 - wp->w_popup_border[2];
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1118 }
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1119 else
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1120 {
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1121 cb->min_col = 0;
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1122 cb->max_col = screen_Columns;
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1123 cb->min_row = 0;
696030820746 patch 8.1.1786: double click in popup scrollbar starts selection
Bram Moolenaar <Bram@vim.org>
parents: 17506
diff changeset
1124 cb->max_row = screen_Rows;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1125 }
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1126 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1127
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1128 if (repeated_click)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1129 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1130 if (++cb->mode > SELECT_MODE_LINE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1131 cb->mode = SELECT_MODE_CHAR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1132 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1133 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1134 cb->mode = SELECT_MODE_CHAR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1135
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1136 #ifdef FEAT_GUI
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1137 // clear the cursor until the selection is made
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1138 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1139 gui_undraw_cursor();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1140 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1141
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1142 switch (cb->mode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1143 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1144 case SELECT_MODE_CHAR:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1145 cb->origin_start_col = cb->start.col;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1146 cb->word_end_col = clip_get_line_end(cb, (int)cb->start.lnum);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1147 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1148
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1149 case SELECT_MODE_WORD:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1150 clip_get_word_boundaries(cb, (int)cb->start.lnum, cb->start.col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1151 cb->origin_start_col = cb->word_start_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1152 cb->origin_end_col = cb->word_end_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1153
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1154 clip_invert_area(cb, (int)cb->start.lnum, cb->word_start_col,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1155 (int)cb->end.lnum, cb->word_end_col, CLIP_SET);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1156 cb->start.col = cb->word_start_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1157 cb->end.col = cb->word_end_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1158 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1159
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1160 case SELECT_MODE_LINE:
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1161 clip_invert_area(cb, (int)cb->start.lnum, 0, (int)cb->start.lnum,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1162 (int)Columns, CLIP_SET);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1163 cb->start.col = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1164 cb->end.col = Columns;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1165 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1166 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1167
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1168 cb->prev = cb->start;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1169
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1170 #ifdef DEBUG_SELECTION
19091
1c75e1974313 patch 8.2.0106: printf formats are not exactly right
Bram Moolenaar <Bram@vim.org>
parents: 18896
diff changeset
1171 printf("Selection started at (%ld,%d)\n", cb->start.lnum, cb->start.col);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1172 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1173 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1174
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1175 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1176 * Continue processing the selection
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1177 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1178 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1179 clip_process_selection(
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1180 int button,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1181 int col,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1182 int row,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1183 int_u repeated_click)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1184 {
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1185 Clipboard_T *cb = &clip_star;
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1186 int diff;
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1187 int slen = 1; // cursor shape width
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1188
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1189 if (button == MOUSE_RELEASE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1190 {
17839
c72989922b51 patch 8.1.1916: trying to allocate negative amount of memory closing popup
Bram Moolenaar <Bram@vim.org>
parents: 17789
diff changeset
1191 if (cb->state != SELECT_IN_PROGRESS)
c72989922b51 patch 8.1.1916: trying to allocate negative amount of memory closing popup
Bram Moolenaar <Bram@vim.org>
parents: 17789
diff changeset
1192 return;
c72989922b51 patch 8.1.1916: trying to allocate negative amount of memory closing popup
Bram Moolenaar <Bram@vim.org>
parents: 17789
diff changeset
1193
c72989922b51 patch 8.1.1916: trying to allocate negative amount of memory closing popup
Bram Moolenaar <Bram@vim.org>
parents: 17789
diff changeset
1194 // Check to make sure we have something selected
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1195 if (cb->start.lnum == cb->end.lnum && cb->start.col == cb->end.col)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1196 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1197 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1198 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1199 gui_update_cursor(FALSE, FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1200 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1201 cb->state = SELECT_CLEARED;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1202 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1203 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1204
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1205 #ifdef DEBUG_SELECTION
19091
1c75e1974313 patch 8.2.0106: printf formats are not exactly right
Bram Moolenaar <Bram@vim.org>
parents: 18896
diff changeset
1206 printf("Selection ended: (%ld,%d) to (%ld,%d)\n", cb->start.lnum,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1207 cb->start.col, cb->end.lnum, cb->end.col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1208 #endif
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1209 if (clip_isautosel_star()
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1210 || (
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1211 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1212 gui.in_use ? (vim_strchr(p_go, GO_ASELML) != NULL) :
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1213 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1214 clip_autoselectml))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1215 clip_copy_modeless_selection(FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1216 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1217 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1218 gui_update_cursor(FALSE, FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1219 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1220
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1221 cb->state = SELECT_DONE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1222 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1223 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1224
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1225 row = check_row(row);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1226 col = check_col(col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1227 col = mb_fix_col(col, row);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1228
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1229 if (col == (int)cb->prev.col && row == cb->prev.lnum && !repeated_click)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1230 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1231
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1232 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1233 * When extending the selection with the right mouse button, swap the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1234 * start and end if the position is before half the selection
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1235 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1236 if (cb->state == SELECT_DONE && button == MOUSE_RIGHT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1237 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1238 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1239 * If the click is before the start, or the click is inside the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1240 * selection and the start is the closest side, set the origin to the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1241 * end of the selection.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1242 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1243 if (clip_compare_pos(row, col, (int)cb->start.lnum, cb->start.col) < 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1244 || (clip_compare_pos(row, col,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1245 (int)cb->end.lnum, cb->end.col) < 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1246 && (((cb->start.lnum == cb->end.lnum
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1247 && cb->end.col - col > col - cb->start.col))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1248 || ((diff = (cb->end.lnum - row) -
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1249 (row - cb->start.lnum)) > 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1250 || (diff == 0 && col < (int)(cb->start.col +
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1251 cb->end.col) / 2)))))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1252 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1253 cb->origin_row = (short_u)cb->end.lnum;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1254 cb->origin_start_col = cb->end.col - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1255 cb->origin_end_col = cb->end.col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1256 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1257 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1258 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1259 cb->origin_row = (short_u)cb->start.lnum;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1260 cb->origin_start_col = cb->start.col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1261 cb->origin_end_col = cb->start.col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1262 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1263 if (cb->mode == SELECT_MODE_WORD && !repeated_click)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1264 cb->mode = SELECT_MODE_CHAR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1265 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1266
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1267 // set state, for when using the right mouse button
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1268 cb->state = SELECT_IN_PROGRESS;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1269
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1270 #ifdef DEBUG_SELECTION
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1271 printf("Selection extending to (%d,%d)\n", row, col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1272 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1273
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1274 if (repeated_click && ++cb->mode > SELECT_MODE_LINE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1275 cb->mode = SELECT_MODE_CHAR;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1276
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1277 switch (cb->mode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1278 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1279 case SELECT_MODE_CHAR:
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1280 // If we're on a different line, find where the line ends
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1281 if (row != cb->prev.lnum)
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1282 cb->word_end_col = clip_get_line_end(cb, row);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1283
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1284 // See if we are before or after the origin of the selection
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1285 if (clip_compare_pos(row, col, cb->origin_row,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1286 cb->origin_start_col) >= 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1287 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1288 if (col >= (int)cb->word_end_col)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1289 clip_update_modeless_selection(cb, cb->origin_row,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1290 cb->origin_start_col, row, (int)Columns);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1291 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1292 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1293 if (has_mbyte && mb_lefthalve(row, col))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1294 slen = 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1295 clip_update_modeless_selection(cb, cb->origin_row,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1296 cb->origin_start_col, row, col + slen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1297 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1298 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1299 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1300 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1301 if (has_mbyte
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1302 && mb_lefthalve(cb->origin_row, cb->origin_start_col))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1303 slen = 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1304 if (col >= (int)cb->word_end_col)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1305 clip_update_modeless_selection(cb, row, cb->word_end_col,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1306 cb->origin_row, cb->origin_start_col + slen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1307 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1308 clip_update_modeless_selection(cb, row, col,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1309 cb->origin_row, cb->origin_start_col + slen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1310 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1311 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1312
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1313 case SELECT_MODE_WORD:
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1314 // If we are still within the same word, do nothing
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1315 if (row == cb->prev.lnum && col >= (int)cb->word_start_col
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1316 && col < (int)cb->word_end_col && !repeated_click)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1317 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1318
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1319 // Get new word boundaries
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1320 clip_get_word_boundaries(cb, row, col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1321
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1322 // Handle being after the origin point of selection
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1323 if (clip_compare_pos(row, col, cb->origin_row,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1324 cb->origin_start_col) >= 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1325 clip_update_modeless_selection(cb, cb->origin_row,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1326 cb->origin_start_col, row, cb->word_end_col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1327 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1328 clip_update_modeless_selection(cb, row, cb->word_start_col,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1329 cb->origin_row, cb->origin_end_col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1330 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1331
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1332 case SELECT_MODE_LINE:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1333 if (row == cb->prev.lnum && !repeated_click)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1334 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1335
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1336 if (clip_compare_pos(row, col, cb->origin_row,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1337 cb->origin_start_col) >= 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1338 clip_update_modeless_selection(cb, cb->origin_row, 0, row,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1339 (int)Columns);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1340 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1341 clip_update_modeless_selection(cb, row, 0, cb->origin_row,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1342 (int)Columns);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1343 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1344 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1345
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1346 cb->prev.lnum = row;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1347 cb->prev.col = col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1348
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1349 #ifdef DEBUG_SELECTION
19091
1c75e1974313 patch 8.2.0106: printf formats are not exactly right
Bram Moolenaar <Bram@vim.org>
parents: 18896
diff changeset
1350 printf("Selection is: (%ld,%d) to (%ld,%d)\n", cb->start.lnum,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1351 cb->start.col, cb->end.lnum, cb->end.col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1352 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1353 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1354
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1355 # if defined(FEAT_GUI) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1356 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1357 * Redraw part of the selection if character at "row,col" is inside of it.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1358 * Only used for the GUI.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1359 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1360 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1361 clip_may_redraw_selection(int row, int col, int len)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1362 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1363 int start = col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1364 int end = col + len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1365
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1366 if (clip_star.state != SELECT_CLEARED
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1367 && row >= clip_star.start.lnum
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1368 && row <= clip_star.end.lnum)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1369 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1370 if (row == clip_star.start.lnum && start < (int)clip_star.start.col)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1371 start = clip_star.start.col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1372 if (row == clip_star.end.lnum && end > (int)clip_star.end.col)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1373 end = clip_star.end.col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1374 if (end > start)
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1375 clip_invert_area(&clip_star, row, start, row, end, 0);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1376 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1377 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1378 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1379
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1380 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1381 * Called from outside to clear selected region from the display
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1382 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1383 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1384 clip_clear_selection(Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1385 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1386
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1387 if (cbd->state == SELECT_CLEARED)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1388 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1389
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1390 clip_invert_area(cbd, (int)cbd->start.lnum, cbd->start.col,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1391 (int)cbd->end.lnum, cbd->end.col, CLIP_CLEAR);
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1392 cbd->state = SELECT_CLEARED;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1393 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1394
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1395 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1396 * Clear the selection if any lines from "row1" to "row2" are inside of it.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1397 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1398 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1399 clip_may_clear_selection(int row1, int row2)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1400 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1401 if (clip_star.state == SELECT_DONE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1402 && row2 >= clip_star.start.lnum
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1403 && row1 <= clip_star.end.lnum)
3674
b9aa7fb4a928 updated for version 7.3.597
Bram Moolenaar <bram@vim.org>
parents: 3346
diff changeset
1404 clip_clear_selection(&clip_star);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1405 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1406
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1407 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1408 * Called before the screen is scrolled up or down. Adjusts the line numbers
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1409 * of the selection. Call with big number when clearing the screen.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1410 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1411 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1412 clip_scroll_selection(
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1413 int rows) // negative for scroll down
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1414 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1415 int lnum;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1416
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1417 if (clip_star.state == SELECT_CLEARED)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1418 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1419
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1420 lnum = clip_star.start.lnum - rows;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1421 if (lnum <= 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1422 clip_star.start.lnum = 0;
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1423 else if (lnum >= screen_Rows) // scrolled off of the screen
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1424 clip_star.state = SELECT_CLEARED;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1425 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1426 clip_star.start.lnum = lnum;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1427
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1428 lnum = clip_star.end.lnum - rows;
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1429 if (lnum < 0) // scrolled off of the screen
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1430 clip_star.state = SELECT_CLEARED;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1431 else if (lnum >= screen_Rows)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1432 clip_star.end.lnum = screen_Rows - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1433 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1434 clip_star.end.lnum = lnum;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1435 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1436
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1437 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1438 * Invert a region of the display between a starting and ending row and column
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1439 * Values for "how":
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1440 * CLIP_CLEAR: undo inversion
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1441 * CLIP_SET: set inversion
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1442 * CLIP_TOGGLE: set inversion if pos1 < pos2, undo inversion otherwise.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1443 * 0: invert (GUI only).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1444 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1445 static void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1446 clip_invert_area(
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1447 Clipboard_T *cbd,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1448 int row1,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1449 int col1,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1450 int row2,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1451 int col2,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1452 int how)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1453 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1454 int invert = FALSE;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1455 int max_col;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1456
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1457 #ifdef FEAT_PROP_POPUP
17748
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1458 max_col = cbd->max_col - 1;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1459 #else
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1460 max_col = Columns - 1;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1461 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1462
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1463 if (how == CLIP_SET)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1464 invert = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1465
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1466 // Swap the from and to positions so the from is always before
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1467 if (clip_compare_pos(row1, col1, row2, col2) > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1468 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1469 int tmp_row, tmp_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1470
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1471 tmp_row = row1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1472 tmp_col = col1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1473 row1 = row2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1474 col1 = col2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1475 row2 = tmp_row;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1476 col2 = tmp_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1477 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1478 else if (how == CLIP_TOGGLE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1479 invert = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1480
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1481 // If all on the same line, do it the easy way
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1482 if (row1 == row2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1483 {
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1484 clip_invert_rectangle(cbd, row1, col1, 1, col2 - col1, invert);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1485 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1486 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1487 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1488 // Handle a piece of the first line
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1489 if (col1 > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1490 {
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1491 clip_invert_rectangle(cbd, row1, col1, 1,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1492 (int)Columns - col1, invert);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1493 row1++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1494 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1495
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1496 // Handle a piece of the last line
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1497 if (col2 < max_col)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1498 {
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1499 clip_invert_rectangle(cbd, row2, 0, 1, col2, invert);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1500 row2--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1501 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1502
19195
2ef19eed524a patch 8.2.0156: various typos in source files and tests
Bram Moolenaar <Bram@vim.org>
parents: 19091
diff changeset
1503 // Handle the rectangle that's left
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1504 if (row2 >= row1)
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1505 clip_invert_rectangle(cbd, row1, 0, row2 - row1 + 1,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1506 (int)Columns, invert);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1507 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1508 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1509
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1510 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1511 * Invert or un-invert a rectangle of the screen.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1512 * "invert" is true if the result is inverted.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1513 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1514 static void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1515 clip_invert_rectangle(
17153
53ae08e30d1c patch 8.1.1576: compiler warning for unused argument
Bram Moolenaar <Bram@vim.org>
parents: 17103
diff changeset
1516 Clipboard_T *cbd UNUSED,
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1517 int row_arg,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1518 int col_arg,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1519 int height_arg,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1520 int width_arg,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1521 int invert)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1522 {
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1523 int row = row_arg;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1524 int col = col_arg;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1525 int height = height_arg;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1526 int width = width_arg;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1527
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1528 #ifdef FEAT_PROP_POPUP
17041
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position
Bram Moolenaar <Bram@vim.org>
parents: 17034
diff changeset
1529 // this goes on top of all popup windows
17162
f16cee6adf29 patch 8.1.1580: cannot make part of a popup transparent
Bram Moolenaar <Bram@vim.org>
parents: 17153
diff changeset
1530 screen_zindex = CLIP_ZINDEX;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1531
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1532 if (col < cbd->min_col)
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1533 {
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1534 width -= cbd->min_col - col;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1535 col = cbd->min_col;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1536 }
17748
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1537 if (width > cbd->max_col - col)
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1538 width = cbd->max_col - col;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1539 if (row < cbd->min_row)
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1540 {
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1541 height -= cbd->min_row - row;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1542 row = cbd->min_row;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1543 }
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1544 if (height > cbd->max_row - row + 1)
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1545 height = cbd->max_row - row + 1;
17041
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position
Bram Moolenaar <Bram@vim.org>
parents: 17034
diff changeset
1546 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1547 #ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1548 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1549 gui_mch_invert_rectangle(row, col, height, width);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1550 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1551 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1552 screen_draw_rectangle(row, col, height, width, invert);
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1553 #ifdef FEAT_PROP_POPUP
17041
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position
Bram Moolenaar <Bram@vim.org>
parents: 17034
diff changeset
1554 screen_zindex = 0;
5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position
Bram Moolenaar <Bram@vim.org>
parents: 17034
diff changeset
1555 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1556 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1557
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1558 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1559 * Copy the currently selected area into the '*' register so it will be
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1560 * available for pasting.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1561 * When "both" is TRUE also copy to the '+' register.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1562 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1563 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1564 clip_copy_modeless_selection(int both UNUSED)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1565 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1566 char_u *buffer;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1567 char_u *bufp;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1568 int row;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1569 int start_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1570 int end_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1571 int line_end_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1572 int add_newline_flag = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1573 int len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1574 char_u *p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1575 int row1 = clip_star.start.lnum;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1576 int col1 = clip_star.start.col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1577 int row2 = clip_star.end.lnum;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1578 int col2 = clip_star.end.col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1579
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1580 // Can't use ScreenLines unless initialized
534
c6296b0ad9ea updated for version 7.0151
vimboss
parents: 474
diff changeset
1581 if (ScreenLines == NULL)
c6296b0ad9ea updated for version 7.0151
vimboss
parents: 474
diff changeset
1582 return;
c6296b0ad9ea updated for version 7.0151
vimboss
parents: 474
diff changeset
1583
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1584 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1585 * Make sure row1 <= row2, and if row1 == row2 that col1 <= col2.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1586 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1587 if (row1 > row2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1588 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1589 row = row1; row1 = row2; row2 = row;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1590 row = col1; col1 = col2; col2 = row;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1591 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1592 else if (row1 == row2 && col1 > col2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1593 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1594 row = col1; col1 = col2; col2 = row;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1595 }
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1596 #ifdef FEAT_PROP_POPUP
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1597 if (col1 < clip_star.min_col)
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1598 col1 = clip_star.min_col;
17748
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1599 if (col2 > clip_star.max_col)
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1600 col2 = clip_star.max_col;
17839
c72989922b51 patch 8.1.1916: trying to allocate negative amount of memory closing popup
Bram Moolenaar <Bram@vim.org>
parents: 17789
diff changeset
1601 if (row1 > clip_star.max_row || row2 < clip_star.min_row)
c72989922b51 patch 8.1.1916: trying to allocate negative amount of memory closing popup
Bram Moolenaar <Bram@vim.org>
parents: 17789
diff changeset
1602 return;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1603 if (row1 < clip_star.min_row)
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1604 row1 = clip_star.min_row;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1605 if (row2 > clip_star.max_row)
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1606 row2 = clip_star.max_row;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1607 #endif
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1608 // correct starting point for being on right halve of double-wide char
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1609 p = ScreenLines + LineOffset[row1];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1610 if (enc_dbcs != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1611 col1 -= (*mb_head_off)(p, p + col1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1612 else if (enc_utf8 && p[col1] == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1613 --col1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1614
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1615 // Create a temporary buffer for storing the text
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1616 len = (row2 - row1 + 1) * Columns + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1617 if (enc_dbcs != 0)
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1618 len *= 2; // max. 2 bytes per display cell
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1619 else if (enc_utf8)
714
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 667
diff changeset
1620 len *= MB_MAXBYTES;
16768
695d9ef00b03 patch 8.1.1386: unessesary type casts for lalloc()
Bram Moolenaar <Bram@vim.org>
parents: 16451
diff changeset
1621 buffer = alloc(len);
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1622 if (buffer == NULL) // out of memory
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1623 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1624
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1625 // Process each row in the selection
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1626 for (bufp = buffer, row = row1; row <= row2; row++)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1627 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1628 if (row == row1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1629 start_col = col1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1630 else
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1631 #ifdef FEAT_PROP_POPUP
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1632 start_col = clip_star.min_col;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1633 #else
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1634 start_col = 0;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1635 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1636
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1637 if (row == row2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1638 end_col = col2;
17748
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1639 else
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1640 #ifdef FEAT_PROP_POPUP
17748
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1641 end_col = clip_star.max_col;
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1642 #else
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1643 end_col = Columns;
17738
f800c3d8ca1b patch 8.1.1866: modeless selection in GUI does not work properly
Bram Moolenaar <Bram@vim.org>
parents: 17708
diff changeset
1644 #endif
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1645
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1646 line_end_col = clip_get_line_end(&clip_star, row);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1647
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1648 // See if we need to nuke some trailing whitespace
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1649 if (end_col >=
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1650 #ifdef FEAT_PROP_POPUP
17748
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1651 clip_star.max_col
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1652 #else
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1653 Columns
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1654 #endif
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1655 && (row < row2 || end_col > line_end_col))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1656 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1657 // Get rid of trailing whitespace
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1658 end_col = line_end_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1659 if (end_col < start_col)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1660 end_col = start_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1661
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1662 // If the last line extended to the end, add an extra newline
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1663 if (row == row2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1664 add_newline_flag = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1665 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1666
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1667 // If after the first row, we need to always add a newline
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1668 if (row > row1 && !LineWraps[row - 1])
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1669 *bufp++ = NL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1670
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1671 // Safetey check for in case resizing went wrong
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1672 if (row < screen_Rows && end_col <= screen_Columns)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1673 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1674 if (enc_dbcs != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1675 {
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 814
diff changeset
1676 int i;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 814
diff changeset
1677
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1678 p = ScreenLines + LineOffset[row];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1679 for (i = start_col; i < end_col; ++i)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1680 if (enc_dbcs == DBCS_JPNU && p[i] == 0x8e)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1681 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1682 // single-width double-byte char
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1683 *bufp++ = 0x8e;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1684 *bufp++ = ScreenLines2[LineOffset[row] + i];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1685 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1686 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1687 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1688 *bufp++ = p[i];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1689 if (MB_BYTE2LEN(p[i]) == 2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1690 *bufp++ = p[++i];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1691 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1692 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1693 else if (enc_utf8)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1694 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1695 int off;
714
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 667
diff changeset
1696 int i;
761
6252da4e8223 updated for version 7.0224
vimboss
parents: 714
diff changeset
1697 int ci;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1698
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1699 off = LineOffset[row];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1700 for (i = start_col; i < end_col; ++i)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1701 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1702 // The base character is either in ScreenLinesUC[] or
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1703 // ScreenLines[].
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1704 if (ScreenLinesUC[off + i] == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1705 *bufp++ = ScreenLines[off + i];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1706 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1707 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1708 bufp += utf_char2bytes(ScreenLinesUC[off + i], bufp);
761
6252da4e8223 updated for version 7.0224
vimboss
parents: 714
diff changeset
1709 for (ci = 0; ci < Screen_mco; ++ci)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1710 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1711 // Add a composing character.
761
6252da4e8223 updated for version 7.0224
vimboss
parents: 714
diff changeset
1712 if (ScreenLinesC[ci][off + i] == 0)
714
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 667
diff changeset
1713 break;
761
6252da4e8223 updated for version 7.0224
vimboss
parents: 714
diff changeset
1714 bufp += utf_char2bytes(ScreenLinesC[ci][off + i],
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1715 bufp);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1716 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1717 }
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1718 // Skip right halve of double-wide character.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1719 if (ScreenLines[off + i + 1] == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1720 ++i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1721 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1722 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1723 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1724 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1725 STRNCPY(bufp, ScreenLines + LineOffset[row] + start_col,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1726 end_col - start_col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1727 bufp += end_col - start_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1728 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1729 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1730 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1731
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1732 // Add a newline at the end if the selection ended there
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1733 if (add_newline_flag)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1734 *bufp++ = NL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1735
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1736 // First cleanup any old selection and become the owner.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1737 clip_free_selection(&clip_star);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1738 clip_own_selection(&clip_star);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1739
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1740 // Yank the text into the '*' register.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1741 clip_yank_selection(MCHAR, buffer, (long)(bufp - buffer), &clip_star);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1742
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1743 // Make the register contents available to the outside world.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1744 clip_gen_set_selection(&clip_star);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1745
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1746 #ifdef FEAT_X11
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1747 if (both)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1748 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1749 // Do the same for the '+' register.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1750 clip_free_selection(&clip_plus);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1751 clip_own_selection(&clip_plus);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1752 clip_yank_selection(MCHAR, buffer, (long)(bufp - buffer), &clip_plus);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1753 clip_gen_set_selection(&clip_plus);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1754 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1755 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1756 vim_free(buffer);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1757 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1758
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1759 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1760 * Find the starting and ending positions of the word at the given row and
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1761 * column. Only white-separated words are recognized here.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1762 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1763 #define CHAR_CLASS(c) (c <= ' ' ? ' ' : vim_iswordc(c))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1764
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1765 static void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1766 clip_get_word_boundaries(Clipboard_T *cb, int row, int col)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1767 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1768 int start_class;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1769 int temp_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1770 char_u *p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1771 int mboff;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1772
534
c6296b0ad9ea updated for version 7.0151
vimboss
parents: 474
diff changeset
1773 if (row >= screen_Rows || col >= screen_Columns || ScreenLines == NULL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1774 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1775
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1776 p = ScreenLines + LineOffset[row];
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1777 // Correct for starting in the right halve of a double-wide char
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1778 if (enc_dbcs != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1779 col -= dbcs_screen_head_off(p, p + col);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1780 else if (enc_utf8 && p[col] == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1781 --col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1782 start_class = CHAR_CLASS(p[col]);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1783
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1784 temp_col = col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1785 for ( ; temp_col > 0; temp_col--)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1786 if (enc_dbcs != 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1787 && (mboff = dbcs_screen_head_off(p, p + temp_col - 1)) > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1788 temp_col -= mboff;
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
1789 else if (CHAR_CLASS(p[temp_col - 1]) != start_class
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
1790 && !(enc_utf8 && p[temp_col - 1] == 0))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1791 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1792 cb->word_start_col = temp_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1793
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1794 temp_col = col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1795 for ( ; temp_col < screen_Columns; temp_col++)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1796 if (enc_dbcs != 0 && dbcs_ptr2cells(p + temp_col) == 2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1797 ++temp_col;
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
1798 else if (CHAR_CLASS(p[temp_col]) != start_class
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
1799 && !(enc_utf8 && p[temp_col] == 0))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1800 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1801 cb->word_end_col = temp_col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1802 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1803
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1804 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1805 * Find the column position for the last non-whitespace character on the given
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1806 * line at or before start_col.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1807 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1808 static int
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1809 clip_get_line_end(Clipboard_T *cbd UNUSED, int row)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1810 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1811 int i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1812
534
c6296b0ad9ea updated for version 7.0151
vimboss
parents: 474
diff changeset
1813 if (row >= screen_Rows || ScreenLines == NULL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1814 return 0;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1815 for (i =
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18679
diff changeset
1816 #ifdef FEAT_PROP_POPUP
17748
6ffe295f7492 patch 8.1.1871: modeless selection in GUI still not correct
Bram Moolenaar <Bram@vim.org>
parents: 17738
diff changeset
1817 cbd->max_col;
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1818 #else
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1819 screen_Columns;
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1820 #endif
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1821 i > 0; i--)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1822 if (ScreenLines[LineOffset[row] + i - 1] != ' ')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1823 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1824 return i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1825 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1826
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1827 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1828 * Update the currently selected region by adding and/or subtracting from the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1829 * beginning or end and inverting the changed area(s).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1830 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1831 static void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1832 clip_update_modeless_selection(
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1833 Clipboard_T *cb,
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1834 int row1,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1835 int col1,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1836 int row2,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
1837 int col2)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1838 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1839 // See if we changed at the beginning of the selection
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1840 if (row1 != cb->start.lnum || col1 != (int)cb->start.col)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1841 {
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1842 clip_invert_area(cb, row1, col1, (int)cb->start.lnum, cb->start.col,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1843 CLIP_TOGGLE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1844 cb->start.lnum = row1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1845 cb->start.col = col1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1846 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1847
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1848 // See if we changed at the end of the selection
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1849 if (row2 != cb->end.lnum || col2 != (int)cb->end.col)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1850 {
17069
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much
Bram Moolenaar <Bram@vim.org>
parents: 17063
diff changeset
1851 clip_invert_area(cb, (int)cb->end.lnum, cb->end.col, row2, col2,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1852 CLIP_TOGGLE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1853 cb->end.lnum = row2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1854 cb->end.col = col2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1855 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1856 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1857
17789
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
1858 static int
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1859 clip_gen_own_selection(Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1860 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1861 #ifdef FEAT_XCLIPBOARD
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1862 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1863 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1864 return clip_mch_own_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1865 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1866 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1867 return clip_xterm_own_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1868 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1869 return clip_mch_own_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1870 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1871 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1872
17789
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
1873 static void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1874 clip_gen_lose_selection(Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1875 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1876 #ifdef FEAT_XCLIPBOARD
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1877 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1878 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1879 clip_mch_lose_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1880 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1881 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1882 clip_xterm_lose_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1883 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1884 clip_mch_lose_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1885 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1886 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1887
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1888 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1889 clip_gen_set_selection(Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1890 {
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
1891 if (!clip_did_set_selection)
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
1892 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1893 // Updating postponed, so that accessing the system clipboard won't
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1894 // hang Vim when accessing it many times (e.g. on a :g command).
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
1895 if ((cbd == &clip_plus && (clip_unnamed_saved & CLIP_UNNAMED_PLUS))
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
1896 || (cbd == &clip_star && (clip_unnamed_saved & CLIP_UNNAMED)))
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
1897 {
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
1898 clipboard_needs_update = TRUE;
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
1899 return;
6543
b01ca71f93b2 updated for version 7.4.598
Bram Moolenaar <bram@vim.org>
parents: 6491
diff changeset
1900 }
6116
7766142fc7d3 updated for version 7.4.396
Bram Moolenaar <bram@vim.org>
parents: 5995
diff changeset
1901 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1902 #ifdef FEAT_XCLIPBOARD
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1903 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1904 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1905 clip_mch_set_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1906 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1907 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1908 clip_xterm_set_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1909 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1910 clip_mch_set_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1911 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1912 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1913
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1914 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1915 clip_gen_request_selection(Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1916 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1917 #ifdef FEAT_XCLIPBOARD
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1918 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1919 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1920 clip_mch_request_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1921 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1922 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1923 clip_xterm_request_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1924 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1925 clip_mch_request_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1926 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1927 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1928
15555
d89c5b339c2a patch 8.1.0785: depending on the configuration some functions are unused
Bram Moolenaar <Bram@vim.org>
parents: 15543
diff changeset
1929 #if (defined(FEAT_X11) && defined(USE_SYSTEM)) || defined(PROTO)
4209
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1930 int
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
1931 clip_gen_owner_exists(Clipboard_T *cbd UNUSED)
4209
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1932 {
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1933 #ifdef FEAT_XCLIPBOARD
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1934 # ifdef FEAT_GUI_GTK
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1935 if (gui.in_use)
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1936 return clip_gtk_owner_exists(cbd);
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1937 else
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1938 # endif
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1939 return clip_x11_owner_exists(cbd);
5184
c6dd0c545e5c updated for version 7.4a.018
Bram Moolenaar <bram@vim.org>
parents: 5136
diff changeset
1940 #else
c6dd0c545e5c updated for version 7.4a.018
Bram Moolenaar <bram@vim.org>
parents: 5136
diff changeset
1941 return TRUE;
4209
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1942 #endif
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1943 }
15555
d89c5b339c2a patch 8.1.0785: depending on the configuration some functions are unused
Bram Moolenaar <Bram@vim.org>
parents: 15543
diff changeset
1944 #endif
4209
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
1945
18679
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1946 /*
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1947 * Extract the items in the 'clipboard' option and set global values.
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1948 * Return an error message or NULL for success.
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1949 */
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1950 char *
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1951 check_clipboard_option(void)
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1952 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1953 int new_unnamed = 0;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1954 int new_autoselect_star = FALSE;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1955 int new_autoselect_plus = FALSE;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1956 int new_autoselectml = FALSE;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1957 int new_html = FALSE;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1958 regprog_T *new_exclude_prog = NULL;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1959 char *errmsg = NULL;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1960 char_u *p;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1961
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1962 for (p = p_cb; *p != NUL; )
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1963 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1964 if (STRNCMP(p, "unnamed", 7) == 0 && (p[7] == ',' || p[7] == NUL))
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1965 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1966 new_unnamed |= CLIP_UNNAMED;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1967 p += 7;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1968 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1969 else if (STRNCMP(p, "unnamedplus", 11) == 0
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1970 && (p[11] == ',' || p[11] == NUL))
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1971 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1972 new_unnamed |= CLIP_UNNAMED_PLUS;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1973 p += 11;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1974 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1975 else if (STRNCMP(p, "autoselect", 10) == 0
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1976 && (p[10] == ',' || p[10] == NUL))
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1977 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1978 new_autoselect_star = TRUE;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1979 p += 10;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1980 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1981 else if (STRNCMP(p, "autoselectplus", 14) == 0
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1982 && (p[14] == ',' || p[14] == NUL))
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1983 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1984 new_autoselect_plus = TRUE;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1985 p += 14;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1986 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1987 else if (STRNCMP(p, "autoselectml", 12) == 0
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1988 && (p[12] == ',' || p[12] == NUL))
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1989 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1990 new_autoselectml = TRUE;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1991 p += 12;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1992 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1993 else if (STRNCMP(p, "html", 4) == 0 && (p[4] == ',' || p[4] == NUL))
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1994 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1995 new_html = TRUE;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1996 p += 4;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1997 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1998 else if (STRNCMP(p, "exclude:", 8) == 0 && new_exclude_prog == NULL)
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
1999 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2000 p += 8;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2001 new_exclude_prog = vim_regcomp(p, RE_MAGIC);
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2002 if (new_exclude_prog == NULL)
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2003 errmsg = e_invarg;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2004 break;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2005 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2006 else
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2007 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2008 errmsg = e_invarg;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2009 break;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2010 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2011 if (*p == ',')
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2012 ++p;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2013 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2014 if (errmsg == NULL)
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2015 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2016 clip_unnamed = new_unnamed;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2017 clip_autoselect_star = new_autoselect_star;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2018 clip_autoselect_plus = new_autoselect_plus;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2019 clip_autoselectml = new_autoselectml;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2020 clip_html = new_html;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2021 vim_regfree(clip_exclude_prog);
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2022 clip_exclude_prog = new_exclude_prog;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2023 #ifdef FEAT_GUI_GTK
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2024 if (gui.in_use)
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2025 {
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2026 gui_gtk_set_selection_targets();
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2027 gui_gtk_set_dnd_targets();
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2028 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2029 #endif
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2030 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2031 else
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2032 vim_regfree(new_exclude_prog);
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2033
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2034 return errmsg;
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2035 }
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2036
fd95d4dbeb37 patch 8.1.2331: the option.c file is still very big
Bram Moolenaar <Bram@vim.org>
parents: 18671
diff changeset
2037 #endif // FEAT_CLIPBOARD
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2038
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2039 //////////////////////////////////////////////////////////////////////////////
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2040 // Functions that handle the input buffer.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2041 // This is used for any GUI version, and the unix terminal version.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2042 //
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2043 // For Unix, the input characters are buffered to be able to check for a
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2044 // CTRL-C. This should be done with signals, but I don't know how to do that
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2045 // in a portable way for a tty in RAW mode.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2046 //
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2047 // For the client-server code in the console the received keys are put in the
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2048 // input buffer.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2049
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2050 #if defined(USE_INPUT_BUF) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2051
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2052 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2053 * Internal typeahead buffer. Includes extra space for long key code
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2054 * descriptions which would otherwise overflow. The buffer is considered full
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2055 * when only this extra space (or part of it) remains.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2056 */
15510
41fbbcea0f1b patch 8.1.0763: nobody is using the Sun Workshop support
Bram Moolenaar <Bram@vim.org>
parents: 15506
diff changeset
2057 #if defined(FEAT_JOB_CHANNEL) || defined(FEAT_CLIENTSERVER)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2058 /*
15510
41fbbcea0f1b patch 8.1.0763: nobody is using the Sun Workshop support
Bram Moolenaar <Bram@vim.org>
parents: 15506
diff changeset
2059 * NetBeans stuffs debugger commands into the input buffer.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2060 * This requires a larger buffer...
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2061 * (Madsen) Go with this for remote input as well ...
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2062 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2063 # define INBUFLEN 4096
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2064 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2065 # define INBUFLEN 250
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2066 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2067
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2068 static char_u inbuf[INBUFLEN + MAX_KEY_CODE_LEN];
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2069 static int inbufcount = 0; // number of chars in inbuf[]
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2070
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2071 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2072 * vim_is_input_buf_full(), vim_is_input_buf_empty(), add_to_input_buf(), and
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2073 * trash_input_buf() are functions for manipulating the input buffer. These
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2074 * are used by the gui_* calls when a GUI is used to handle keyboard input.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2075 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2076
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2077 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2078 vim_is_input_buf_full(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2079 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2080 return (inbufcount >= INBUFLEN);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2081 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2082
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2083 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2084 vim_is_input_buf_empty(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2085 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2086 return (inbufcount == 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2087 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2088
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2089 #if defined(FEAT_OLE) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2090 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2091 vim_free_in_input_buf(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2092 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2093 return (INBUFLEN - inbufcount);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2094 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2095 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2096
575
f1d46f948241 updated for version 7.0163
vimboss
parents: 534
diff changeset
2097 #if defined(FEAT_GUI_GTK) || defined(PROTO)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2098 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2099 vim_used_in_input_buf(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2100 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2101 return inbufcount;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2102 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2103 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2104
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2105 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2106 * Return the current contents of the input buffer and make it empty.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2107 * The returned pointer must be passed to set_input_buf() later.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2108 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2109 char_u *
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2110 get_input_buf(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2111 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2112 garray_T *gap;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2113
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2114 // We use a growarray to store the data pointer and the length.
16825
ce04ebdf26b8 patch 8.1.1414: alloc() returning "char_u *" causes a lot of type casts
Bram Moolenaar <Bram@vim.org>
parents: 16768
diff changeset
2115 gap = ALLOC_ONE(garray_T);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2116 if (gap != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2117 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2118 // Add one to avoid a zero size.
16768
695d9ef00b03 patch 8.1.1386: unessesary type casts for lalloc()
Bram Moolenaar <Bram@vim.org>
parents: 16451
diff changeset
2119 gap->ga_data = alloc(inbufcount + 1);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2120 if (gap->ga_data != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2121 mch_memmove(gap->ga_data, inbuf, (size_t)inbufcount);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2122 gap->ga_len = inbufcount;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2123 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2124 trash_input_buf();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2125 return (char_u *)gap;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2126 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2127
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2128 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2129 * Restore the input buffer with a pointer returned from get_input_buf().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2130 * The allocated memory is freed, this only works once!
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2131 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2132 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2133 set_input_buf(char_u *p)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2134 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2135 garray_T *gap = (garray_T *)p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2136
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2137 if (gap != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2138 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2139 if (gap->ga_data != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2140 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2141 mch_memmove(inbuf, gap->ga_data, gap->ga_len);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2142 inbufcount = gap->ga_len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2143 vim_free(gap->ga_data);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2144 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2145 vim_free(gap);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2146 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2147 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2148
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2149 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2150 * Add the given bytes to the input buffer
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2151 * Special keys start with CSI. A real CSI must have been translated to
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2152 * CSI KS_EXTRA KE_CSI. K_SPECIAL doesn't require translation.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2153 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2154 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2155 add_to_input_buf(char_u *s, int len)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2156 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2157 if (inbufcount + len > INBUFLEN + MAX_KEY_CODE_LEN)
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2158 return; // Shouldn't ever happen!
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2159
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2160 while (len--)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2161 inbuf[inbufcount++] = *s++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2162 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2163
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2164 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2165 * Add "str[len]" to the input buffer while escaping CSI bytes.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2166 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2167 void
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2168 add_to_input_buf_csi(char_u *str, int len)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2169 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2170 int i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2171 char_u buf[2];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2172
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2173 for (i = 0; i < len; ++i)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2174 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2175 add_to_input_buf(str + i, 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2176 if (str[i] == CSI)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2177 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2178 // Turn CSI into K_CSI.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2179 buf[0] = KS_EXTRA;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2180 buf[1] = (int)KE_CSI;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2181 add_to_input_buf(buf, 2);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2182 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2183 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2184 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2185
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2186 /*
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2187 * Remove everything from the input buffer. Called when ^C is found.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2188 */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2189 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2190 trash_input_buf(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2191 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2192 inbufcount = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2193 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2194
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2195 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2196 * Read as much data from the input buffer as possible up to maxlen, and store
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2197 * it in buf.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2198 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2199 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2200 read_from_input_buf(char_u *buf, long maxlen)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2201 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2202 if (inbufcount == 0) // if the buffer is empty, fill it
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2203 fill_input_buf(TRUE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2204 if (maxlen > inbufcount)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2205 maxlen = inbufcount;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2206 mch_memmove(buf, inbuf, (size_t)maxlen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2207 inbufcount -= maxlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2208 if (inbufcount)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2209 mch_memmove(inbuf, inbuf + maxlen, (size_t)inbufcount);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2210 return (int)maxlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2211 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2212
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2213 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2214 fill_input_buf(int exit_on_error UNUSED)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2215 {
12716
351cf7c67bbe patch 8.0.1236: Mac features are confusing
Christian Brabandt <cb@256bit.org>
parents: 12519
diff changeset
2216 #if defined(UNIX) || defined(VMS) || defined(MACOS_X)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2217 int len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2218 int try;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2219 static int did_read_something = FALSE;
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2220 static char_u *rest = NULL; // unconverted rest of previous read
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2221 static int restlen = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2222 int unconverted;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2223 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2224
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2225 #ifdef FEAT_GUI
294
1c1cbdc42f75 updated for version 7.0077
vimboss
parents: 274
diff changeset
2226 if (gui.in_use
1c1cbdc42f75 updated for version 7.0077
vimboss
parents: 274
diff changeset
2227 # ifdef NO_CONSOLE_INPUT
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2228 // Don't use the GUI input when the window hasn't been opened yet.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2229 // We get here from ui_inchar() when we should try reading from stdin.
294
1c1cbdc42f75 updated for version 7.0077
vimboss
parents: 274
diff changeset
2230 && !no_console_input()
1c1cbdc42f75 updated for version 7.0077
vimboss
parents: 274
diff changeset
2231 # endif
1c1cbdc42f75 updated for version 7.0077
vimboss
parents: 274
diff changeset
2232 )
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2233 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2234 gui_mch_update();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2235 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2236 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2237 #endif
12716
351cf7c67bbe patch 8.0.1236: Mac features are confusing
Christian Brabandt <cb@256bit.org>
parents: 12519
diff changeset
2238 #if defined(UNIX) || defined(VMS) || defined(MACOS_X)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2239 if (vim_is_input_buf_full())
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2240 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2241 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2242 * Fill_input_buf() is only called when we really need a character.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2243 * If we can't get any, but there is some in the buffer, just return.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2244 * If we can't get any, and there isn't any in the buffer, we give up and
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2245 * exit Vim.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2246 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2247 # ifdef __BEOS__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2248 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2249 * On the BeBox version (for now), all input is secretly performed within
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2250 * beos_select() which is called from RealWaitForChar().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2251 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2252 while (!vim_is_input_buf_full() && RealWaitForChar(read_cmd_fd, 0, NULL))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2253 ;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2254 len = inbufcount;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2255 inbufcount = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2256 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2257
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2258 if (rest != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2259 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2260 // Use remainder of previous call, starts with an invalid character
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2261 // that may become valid when reading more.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2262 if (restlen > INBUFLEN - inbufcount)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2263 unconverted = INBUFLEN - inbufcount;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2264 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2265 unconverted = restlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2266 mch_memmove(inbuf + inbufcount, rest, unconverted);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2267 if (unconverted == restlen)
13244
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
2268 VIM_CLEAR(rest);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2269 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2270 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2271 restlen -= unconverted;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2272 mch_memmove(rest, rest + unconverted, restlen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2273 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2274 inbufcount += unconverted;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2275 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2276 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2277 unconverted = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2278
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2279 len = 0; // to avoid gcc warning
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2280 for (try = 0; try < 100; ++try)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2281 {
13758
63679d671ced patch 8.0.1751: #ifdef causes bad highlighting
Christian Brabandt <cb@256bit.org>
parents: 13448
diff changeset
2282 size_t readlen = (size_t)((INBUFLEN - inbufcount)
19730
fe8ba2f82f59 patch 8.2.0421: interrupting with CTRL-C does not always work
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
2283 / input_conv.vc_factor);
13758
63679d671ced patch 8.0.1751: #ifdef causes bad highlighting
Christian Brabandt <cb@256bit.org>
parents: 13448
diff changeset
2284 # ifdef VMS
13776
ef6de4674811 patch 8.0.1760: wrong number of arguments to vms_read()
Christian Brabandt <cb@256bit.org>
parents: 13758
diff changeset
2285 len = vms_read((char *)inbuf + inbufcount, readlen);
13758
63679d671ced patch 8.0.1751: #ifdef causes bad highlighting
Christian Brabandt <cb@256bit.org>
parents: 13448
diff changeset
2286 # else
63679d671ced patch 8.0.1751: #ifdef causes bad highlighting
Christian Brabandt <cb@256bit.org>
parents: 13448
diff changeset
2287 len = read(read_cmd_fd, (char *)inbuf + inbufcount, readlen);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2288 # endif
169
0e902b8f511f updated for version 7.0051
vimboss
parents: 39
diff changeset
2289
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2290 if (len > 0 || got_int)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2291 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2292 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2293 * If reading stdin results in an error, continue reading stderr.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2294 * This helps when using "foo | xargs vim".
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2295 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2296 if (!did_read_something && !isatty(read_cmd_fd) && read_cmd_fd == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2297 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2298 int m = cur_tmode;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2299
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2300 // We probably set the wrong file descriptor to raw mode. Switch
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2301 // back to cooked mode, use another descriptor and set the mode to
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2302 // what it was.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2303 settmode(TMODE_COOK);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2304 #ifdef HAVE_DUP
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2305 // Use stderr for stdin, also works for shell commands.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2306 close(0);
14730
193471015e1a patch 8.1.0377: xdiff doesn't use the Vim memory allocation functions
Christian Brabandt <cb@256bit.org>
parents: 13888
diff changeset
2307 vim_ignored = dup(2);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2308 #else
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2309 read_cmd_fd = 2; // read from stderr instead of stdin
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2310 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2311 settmode(m);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2312 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2313 if (!exit_on_error)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2314 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2315 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2316 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2317 if (len <= 0 && !got_int)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2318 read_error_exit();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2319 if (len > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2320 did_read_something = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2321 if (got_int)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2322 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2323 // Interrupted, pretend a CTRL-C was typed.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2324 inbuf[0] = 3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2325 inbufcount = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2326 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2327 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2328 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2329 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2330 * May perform conversion on the input characters.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2331 * Include the unconverted rest of the previous call.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2332 * If there is an incomplete char at the end it is kept for the next
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2333 * time, reading more bytes should make conversion possible.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2334 * Don't do this in the unlikely event that the input buffer is too
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2335 * small ("rest" still contains more bytes).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2336 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2337 if (input_conv.vc_type != CONV_NONE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2338 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2339 inbufcount -= unconverted;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2340 len = convert_input_safe(inbuf + inbufcount,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2341 len + unconverted, INBUFLEN - inbufcount,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2342 rest == NULL ? &rest : NULL, &restlen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2343 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2344 while (len-- > 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2345 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2346 /*
19730
fe8ba2f82f59 patch 8.2.0421: interrupting with CTRL-C does not always work
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
2347 * If a CTRL-C was typed, remove it from the buffer and set
fe8ba2f82f59 patch 8.2.0421: interrupting with CTRL-C does not always work
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
2348 * got_int. Also recognize CTRL-C with modifyOtherKeys set.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2349 */
19730
fe8ba2f82f59 patch 8.2.0421: interrupting with CTRL-C does not always work
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
2350 if (ctrl_c_interrupts && (inbuf[inbufcount] == 3
fe8ba2f82f59 patch 8.2.0421: interrupting with CTRL-C does not always work
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
2351 || (len >= 9 && STRNCMP(inbuf + inbufcount,
19750
aa674de6d813 patch 8.2.0431: some compilers don't support using e for Esc
Bram Moolenaar <Bram@vim.org>
parents: 19738
diff changeset
2352 "\033[27;5;99~", 10) == 0)))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2353 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2354 // remove everything typed before the CTRL-C
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2355 mch_memmove(inbuf, inbuf + inbufcount, (size_t)(len + 1));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2356 inbufcount = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2357 got_int = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2358 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2359 ++inbufcount;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2360 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2361 }
18880
18a4871332ce patch 8.2.0001: #endif comments do reflect corresponding #ifdef
Bram Moolenaar <Bram@vim.org>
parents: 18816
diff changeset
2362 #endif // UNIX || VMS || MACOS_X
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2363 }
18880
18a4871332ce patch 8.2.0001: #endif comments do reflect corresponding #ifdef
Bram Moolenaar <Bram@vim.org>
parents: 18816
diff changeset
2364 #endif // USE_INPUT_BUF
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2365
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2366 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2367 * Exit because of an input read error.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2368 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2369 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2370 read_error_exit(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2371 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2372 if (silent_mode) // Normal way to exit for "ex -s"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2373 getout(0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2374 STRCPY(IObuff, _("Vim: Error reading input, exiting...\n"));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2375 preserve_exit();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2376 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2377
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2378 #if defined(CURSOR_SHAPE) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2379 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2380 * May update the shape of the cursor.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2381 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2382 void
12076
ca4931a20f8c patch 8.0.0918: cannot get terminal window cursor shape or attributes
Christian Brabandt <cb@256bit.org>
parents: 11709
diff changeset
2383 ui_cursor_shape_forced(int forced)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2384 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2385 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2386 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2387 gui_update_cursor_later();
36
125e80798a85 updated for version 7.0021
vimboss
parents: 11
diff changeset
2388 else
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2389 # endif
12076
ca4931a20f8c patch 8.0.0918: cannot get terminal window cursor shape or attributes
Christian Brabandt <cb@256bit.org>
parents: 11709
diff changeset
2390 term_cursor_mode(forced);
36
125e80798a85 updated for version 7.0021
vimboss
parents: 11
diff changeset
2391
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2392 # ifdef MCH_CURSOR_SHAPE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2393 mch_update_cursor();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2394 # endif
2378
85b7dc8da5eb Add the 'concealcursor' option to decide when the cursor line is to be
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2395
85b7dc8da5eb Add the 'concealcursor' option to decide when the cursor line is to be
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2396 # ifdef FEAT_CONCEAL
13876
156ebdcb8ef5 patch 8.0.1809: various typos
Christian Brabandt <cb@256bit.org>
parents: 13776
diff changeset
2397 conceal_check_cursor_line();
2378
85b7dc8da5eb Add the 'concealcursor' option to decide when the cursor line is to be
Bram Moolenaar <bram@vim.org>
parents: 2311
diff changeset
2398 # endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2399 }
12076
ca4931a20f8c patch 8.0.0918: cannot get terminal window cursor shape or attributes
Christian Brabandt <cb@256bit.org>
parents: 11709
diff changeset
2400
ca4931a20f8c patch 8.0.0918: cannot get terminal window cursor shape or attributes
Christian Brabandt <cb@256bit.org>
parents: 11709
diff changeset
2401 void
ca4931a20f8c patch 8.0.0918: cannot get terminal window cursor shape or attributes
Christian Brabandt <cb@256bit.org>
parents: 11709
diff changeset
2402 ui_cursor_shape(void)
ca4931a20f8c patch 8.0.0918: cannot get terminal window cursor shape or attributes
Christian Brabandt <cb@256bit.org>
parents: 11709
diff changeset
2403 {
ca4931a20f8c patch 8.0.0918: cannot get terminal window cursor shape or attributes
Christian Brabandt <cb@256bit.org>
parents: 11709
diff changeset
2404 ui_cursor_shape_forced(FALSE);
ca4931a20f8c patch 8.0.0918: cannot get terminal window cursor shape or attributes
Christian Brabandt <cb@256bit.org>
parents: 11709
diff changeset
2405 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2406 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2407
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2408 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2409 * Check bounds for column number
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2410 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2411 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2412 check_col(int col)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2413 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2414 if (col < 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2415 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2416 if (col >= (int)screen_Columns)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2417 return (int)screen_Columns - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2418 return col;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2419 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2420
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2421 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2422 * Check bounds for row number
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2423 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2424 int
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2425 check_row(int row)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2426 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2427 if (row < 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2428 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2429 if (row >= (int)screen_Rows)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2430 return (int)screen_Rows - 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2431 return row;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2432 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2433
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2434 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2435 * Stuff for the X clipboard. Shared between VMS and Unix.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2436 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2437
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2438 #if defined(FEAT_XCLIPBOARD) || defined(FEAT_GUI_X11) || defined(PROTO)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2439 # include <X11/Xatom.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2440 # include <X11/Intrinsic.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2441
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2442 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2443 * Open the application context (if it hasn't been opened yet).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2444 * Used for Motif and Athena GUI and the xterm clipboard.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2445 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2446 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2447 open_app_context(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2448 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2449 if (app_context == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2450 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2451 XtToolkitInitialize();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2452 app_context = XtCreateApplicationContext();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2453 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2454 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2455
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2456 static Atom vim_atom; // Vim's own special selection format
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2457 static Atom vimenc_atom; // Vim's extended selection format
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2458 static Atom utf8_atom;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2459 static Atom compound_text_atom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2460 static Atom text_atom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2461 static Atom targets_atom;
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2462 static Atom timestamp_atom; // Used to get a timestamp
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2463
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2464 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2465 x11_setup_atoms(Display *dpy)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2466 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2467 vim_atom = XInternAtom(dpy, VIM_ATOM_NAME, False);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2468 vimenc_atom = XInternAtom(dpy, VIMENC_ATOM_NAME,False);
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2469 utf8_atom = XInternAtom(dpy, "UTF8_STRING", False);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2470 compound_text_atom = XInternAtom(dpy, "COMPOUND_TEXT", False);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2471 text_atom = XInternAtom(dpy, "TEXT", False);
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2472 targets_atom = XInternAtom(dpy, "TARGETS", False);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2473 clip_star.sel_atom = XA_PRIMARY;
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2474 clip_plus.sel_atom = XInternAtom(dpy, "CLIPBOARD", False);
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2475 timestamp_atom = XInternAtom(dpy, "TIMESTAMP", False);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2476 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2477
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2478 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2479 * X Selection stuff, for cutting and pasting text to other windows.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2480 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2481
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2482 static Boolean clip_x11_convert_selection_cb(Widget w, Atom *sel_atom, Atom *target, Atom *type, XtPointer *value, long_u *length, int *format);
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2483 static void clip_x11_lose_ownership_cb(Widget w, Atom *sel_atom);
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2484 static void clip_x11_notify_cb(Widget w, Atom *sel_atom, Atom *target);
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2485
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2486 /*
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2487 * Property callback to get a timestamp for XtOwnSelection.
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2488 */
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2489 static void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2490 clip_x11_timestamp_cb(
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2491 Widget w,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2492 XtPointer n UNUSED,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2493 XEvent *event,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2494 Boolean *cont UNUSED)
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2495 {
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2496 Atom actual_type;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2497 int format;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2498 unsigned long nitems, bytes_after;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2499 unsigned char *prop=NULL;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2500 XPropertyEvent *xproperty=&event->xproperty;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2501
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2502 // Must be a property notify, state can't be Delete (True), has to be
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2503 // one of the supported selection types.
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2504 if (event->type != PropertyNotify || xproperty->state
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2505 || (xproperty->atom != clip_star.sel_atom
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2506 && xproperty->atom != clip_plus.sel_atom))
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2507 return;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2508
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2509 if (XGetWindowProperty(xproperty->display, xproperty->window,
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2510 xproperty->atom, 0, 0, False, timestamp_atom, &actual_type, &format,
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2511 &nitems, &bytes_after, &prop))
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2512 return;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2513
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2514 if (prop)
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2515 XFree(prop);
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2516
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2517 // Make sure the property type is "TIMESTAMP" and it's 32 bits.
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2518 if (actual_type != timestamp_atom || format != 32)
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2519 return;
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2520
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2521 // Get the selection, using the event timestamp.
2586
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2522 if (XtOwnSelection(w, xproperty->atom, xproperty->time,
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2523 clip_x11_convert_selection_cb, clip_x11_lose_ownership_cb,
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2524 clip_x11_notify_cb) == OK)
2586
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2525 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2526 // Set the "owned" flag now, there may have been a call to
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2527 // lose_ownership_cb in between.
2586
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2528 if (xproperty->atom == clip_plus.sel_atom)
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2529 clip_plus.owned = TRUE;
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2530 else
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2531 clip_star.owned = TRUE;
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2532 }
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2533 }
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2534
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2535 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2536 x11_setup_selection(Widget w)
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2537 {
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2538 XtAddEventHandler(w, PropertyChangeMask, False,
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2539 /*(XtEventHandler)*/clip_x11_timestamp_cb, (XtPointer)NULL);
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2540 }
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2541
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2542 static void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2543 clip_x11_request_selection_cb(
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2544 Widget w UNUSED,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2545 XtPointer success,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2546 Atom *sel_atom,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2547 Atom *type,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2548 XtPointer value,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2549 long_u *length,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2550 int *format)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2551 {
2896
fd4224d9ee09 updated for version 7.3.221
Bram Moolenaar <bram@vim.org>
parents: 2586
diff changeset
2552 int motion_type = MAUTO;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2553 long_u len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2554 char_u *p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2555 char **text_list = NULL;
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
2556 Clipboard_T *cbd;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2557 char_u *tmpbuf = NULL;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2558
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2559 if (*sel_atom == clip_plus.sel_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2560 cbd = &clip_plus;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2561 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2562 cbd = &clip_star;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2563
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2564 if (value == NULL || *length == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2565 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2566 clip_free_selection(cbd); // nothing received, clear register
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2567 *(int *)success = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2568 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2569 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2570 p = (char_u *)value;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2571 len = *length;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2572 if (*type == vim_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2573 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2574 motion_type = *p++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2575 len--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2576 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2577
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2578 else if (*type == vimenc_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2579 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2580 char_u *enc;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2581 vimconv_T conv;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2582 int convlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2583
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2584 motion_type = *p++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2585 --len;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2586
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2587 enc = p;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2588 p += STRLEN(p) + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2589 len -= p - enc;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2590
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2591 // If the encoding of the text is different from 'encoding', attempt
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2592 // converting it.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2593 conv.vc_type = CONV_NONE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2594 convert_setup(&conv, enc, p_enc);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2595 if (conv.vc_type != CONV_NONE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2596 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2597 convlen = len; // Need to use an int here.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2598 tmpbuf = string_convert(&conv, p, &convlen);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2599 len = convlen;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2600 if (tmpbuf != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2601 p = tmpbuf;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2602 convert_setup(&conv, NULL, NULL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2603 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2604 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2605
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2606 else if (*type == compound_text_atom
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2607 || *type == utf8_atom
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
2608 || (enc_dbcs != 0 && *type == text_atom))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2609 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2610 XTextProperty text_prop;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2611 int n_text = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2612 int status;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2613
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2614 text_prop.value = (unsigned char *)value;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2615 text_prop.encoding = *type;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2616 text_prop.format = *format;
1719
0670d0df210a updated for version 7.2-017
vimboss
parents: 1715
diff changeset
2617 text_prop.nitems = len;
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
2618 #if defined(X_HAVE_UTF8_STRING)
4201
3fd805ca2a6a updated for version 7.3.852
Bram Moolenaar <bram@vim.org>
parents: 3877
diff changeset
2619 if (*type == utf8_atom)
3fd805ca2a6a updated for version 7.3.852
Bram Moolenaar <bram@vim.org>
parents: 3877
diff changeset
2620 status = Xutf8TextPropertyToTextList(X_DISPLAY, &text_prop,
3fd805ca2a6a updated for version 7.3.852
Bram Moolenaar <bram@vim.org>
parents: 3877
diff changeset
2621 &text_list, &n_text);
3fd805ca2a6a updated for version 7.3.852
Bram Moolenaar <bram@vim.org>
parents: 3877
diff changeset
2622 else
3fd805ca2a6a updated for version 7.3.852
Bram Moolenaar <bram@vim.org>
parents: 3877
diff changeset
2623 #endif
3fd805ca2a6a updated for version 7.3.852
Bram Moolenaar <bram@vim.org>
parents: 3877
diff changeset
2624 status = XmbTextPropertyToTextList(X_DISPLAY, &text_prop,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2625 &text_list, &n_text);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2626 if (status != Success || n_text < 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2627 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2628 *(int *)success = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2629 return;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2630 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2631 p = (char_u *)text_list[0];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2632 len = STRLEN(p);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2633 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2634 clip_yank_selection(motion_type, p, (long)len, cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2635
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2636 if (text_list != NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2637 XFreeStringList(text_list);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2638 vim_free(tmpbuf);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2639 XtFree((char *)value);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2640 *(int *)success = TRUE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2641 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2642
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2643 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2644 clip_x11_request_selection(
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2645 Widget myShell,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2646 Display *dpy,
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
2647 Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2648 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2649 XEvent event;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2650 Atom type;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2651 static int success;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2652 int i;
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2653 time_t start_time;
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2654 int timed_out = FALSE;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2655
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
2656 for (i = 0; i < 6; i++)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2657 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2658 switch (i)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2659 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2660 case 0: type = vimenc_atom; break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2661 case 1: type = vim_atom; break;
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2662 case 2: type = utf8_atom; break;
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2663 case 3: type = compound_text_atom; break;
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2664 case 4: type = text_atom; break;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2665 default: type = XA_STRING;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2666 }
4272
902d6ab377ee updated for version 7.3.886
Bram Moolenaar <bram@vim.org>
parents: 4209
diff changeset
2667 if (type == utf8_atom
902d6ab377ee updated for version 7.3.886
Bram Moolenaar <bram@vim.org>
parents: 4209
diff changeset
2668 # if defined(X_HAVE_UTF8_STRING)
902d6ab377ee updated for version 7.3.886
Bram Moolenaar <bram@vim.org>
parents: 4209
diff changeset
2669 && !enc_utf8
902d6ab377ee updated for version 7.3.886
Bram Moolenaar <bram@vim.org>
parents: 4209
diff changeset
2670 # endif
902d6ab377ee updated for version 7.3.886
Bram Moolenaar <bram@vim.org>
parents: 4209
diff changeset
2671 )
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2672 // Only request utf-8 when 'encoding' is utf8 and
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2673 // Xutf8TextPropertyToTextList is available.
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2674 continue;
1719
0670d0df210a updated for version 7.2-017
vimboss
parents: 1715
diff changeset
2675 success = MAYBE;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2676 XtGetSelectionValue(myShell, cbd->sel_atom, type,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2677 clip_x11_request_selection_cb, (XtPointer)&success, CurrentTime);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2678
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2679 // Make sure the request for the selection goes out before waiting for
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2680 // a response.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2681 XFlush(dpy);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2682
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2683 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2684 * Wait for result of selection request, otherwise if we type more
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2685 * characters, then they will appear before the one that requested the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2686 * paste! Don't worry, we will catch up with any other events later.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2687 */
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2688 start_time = time(NULL);
1719
0670d0df210a updated for version 7.2-017
vimboss
parents: 1715
diff changeset
2689 while (success == MAYBE)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2690 {
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2691 if (XCheckTypedEvent(dpy, PropertyNotify, &event)
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2692 || XCheckTypedEvent(dpy, SelectionNotify, &event)
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2693 || XCheckTypedEvent(dpy, SelectionRequest, &event))
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2694 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2695 // This is where clip_x11_request_selection_cb() should be
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2696 // called. It may actually happen a bit later, so we loop
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2697 // until "success" changes.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2698 // We may get a SelectionRequest here and if we don't handle
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2699 // it we hang. KDE klipper does this, for example.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2700 // We need to handle a PropertyNotify for large selections.
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2701 XtDispatchEvent(&event);
1719
0670d0df210a updated for version 7.2-017
vimboss
parents: 1715
diff changeset
2702 continue;
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2703 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2704
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2705 // Time out after 2 to 3 seconds to avoid that we hang when the
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2706 // other process doesn't respond. Note that the SelectionNotify
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2707 // event may still come later when the selection owner comes back
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2708 // to life and the text gets inserted unexpectedly. Don't know
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2709 // why that happens or how to avoid that :-(.
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2710 if (time(NULL) > start_time + 2)
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2711 {
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2712 timed_out = TRUE;
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2713 break;
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2714 }
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2715
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2716 // Do we need this? Probably not.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2717 XSync(dpy, False);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2718
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2719 // Wait for 1 msec to avoid that we eat up all CPU time.
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2720 ui_delay(1L, TRUE);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2721 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2722
1719
0670d0df210a updated for version 7.2-017
vimboss
parents: 1715
diff changeset
2723 if (success == TRUE)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2724 return;
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2725
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2726 // don't do a retry with another type after timing out, otherwise we
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2727 // hang for 15 seconds.
1715
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2728 if (timed_out)
afb64d9f5b8e updated for version 7.2-013
vimboss
parents: 1671
diff changeset
2729 break;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2730 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2731
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2732 // Final fallback position - use the X CUT_BUFFER0 store
1924
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2733 yank_cut_buffer0(dpy, cbd);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2734 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2735
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2736 static Boolean
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2737 clip_x11_convert_selection_cb(
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2738 Widget w UNUSED,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2739 Atom *sel_atom,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2740 Atom *target,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2741 Atom *type,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2742 XtPointer *value,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2743 long_u *length,
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2744 int *format)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2745 {
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2746 static char_u *save_result = NULL;
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2747 static long_u save_length = 0;
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2748 char_u *string;
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2749 int motion_type;
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
2750 Clipboard_T *cbd;
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2751 int i;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2752
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2753 if (*sel_atom == clip_plus.sel_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2754 cbd = &clip_plus;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2755 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2756 cbd = &clip_star;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2757
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2758 if (!cbd->owned)
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2759 return False; // Shouldn't ever happen
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2760
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2761 // requestor wants to know what target types we support
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2762 if (*target == targets_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2763 {
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2764 static Atom array[7];
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2765
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2766 *value = (XtPointer)array;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2767 i = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2768 array[i++] = targets_atom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2769 array[i++] = vimenc_atom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2770 array[i++] = vim_atom;
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2771 if (enc_utf8)
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2772 array[i++] = utf8_atom;
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2773 array[i++] = XA_STRING;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2774 array[i++] = text_atom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2775 array[i++] = compound_text_atom;
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2776
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2777 *type = XA_ATOM;
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2778 // This used to be: *format = sizeof(Atom) * 8; but that caused
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2779 // crashes on 64 bit machines. (Peter Derr)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2780 *format = 32;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2781 *length = i;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2782 return True;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2783 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2784
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2785 if ( *target != XA_STRING
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2786 && *target != vimenc_atom
5956
a076237d1c38 updated for version 7.4.319
Bram Moolenaar <bram@vim.org>
parents: 5735
diff changeset
2787 && (*target != utf8_atom || !enc_utf8)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2788 && *target != vim_atom
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2789 && *target != text_atom
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2790 && *target != compound_text_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2791 return False;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2792
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2793 clip_get_selection(cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2794 motion_type = clip_convert_selection(&string, length, cbd);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2795 if (motion_type < 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2796 return False;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2797
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2798 // For our own format, the first byte contains the motion type
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2799 if (*target == vim_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2800 (*length)++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2801
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2802 // Our own format with encoding: motion 'encoding' NUL text
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2803 if (*target == vimenc_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2804 *length += STRLEN(p_enc) + 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2805
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2806 if (save_length < *length || save_length / 2 >= *length)
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2807 *value = XtRealloc((char *)save_result, (Cardinal)*length + 1);
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2808 else
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2809 *value = save_result;
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2810 if (*value == NULL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2811 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2812 vim_free(string);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2813 return False;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2814 }
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2815 save_result = (char_u *)*value;
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2816 save_length = *length;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2817
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15555
diff changeset
2818 if (*target == XA_STRING || (*target == utf8_atom && enc_utf8))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2819 {
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2820 mch_memmove(save_result, string, (size_t)(*length));
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2821 *type = *target;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2822 }
3346
e3cbb11f3555 updated for version 7.3.440
Bram Moolenaar <bram@vim.org>
parents: 3312
diff changeset
2823 else if (*target == compound_text_atom || *target == text_atom)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2824 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2825 XTextProperty text_prop;
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2826 char *string_nt = (char *)save_result;
5037
5e0b6a9282df updated for version 7.3.1262
Bram Moolenaar <bram@vim.org>
parents: 4272
diff changeset
2827 int conv_result;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2828
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2829 // create NUL terminated string which XmbTextListToTextProperty wants
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2830 mch_memmove(string_nt, string, (size_t)*length);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2831 string_nt[*length] = NUL;
5037
5e0b6a9282df updated for version 7.3.1262
Bram Moolenaar <bram@vim.org>
parents: 4272
diff changeset
2832 conv_result = XmbTextListToTextProperty(X_DISPLAY, (char **)&string_nt,
5e0b6a9282df updated for version 7.3.1262
Bram Moolenaar <bram@vim.org>
parents: 4272
diff changeset
2833 1, XCompoundTextStyle, &text_prop);
5e0b6a9282df updated for version 7.3.1262
Bram Moolenaar <bram@vim.org>
parents: 4272
diff changeset
2834 if (conv_result != Success)
5e0b6a9282df updated for version 7.3.1262
Bram Moolenaar <bram@vim.org>
parents: 4272
diff changeset
2835 {
5e0b6a9282df updated for version 7.3.1262
Bram Moolenaar <bram@vim.org>
parents: 4272
diff changeset
2836 vim_free(string);
5e0b6a9282df updated for version 7.3.1262
Bram Moolenaar <bram@vim.org>
parents: 4272
diff changeset
2837 return False;
5e0b6a9282df updated for version 7.3.1262
Bram Moolenaar <bram@vim.org>
parents: 4272
diff changeset
2838 }
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2839 *value = (XtPointer)(text_prop.value); // from plain text
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2840 *length = text_prop.nitems;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2841 *type = compound_text_atom;
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2842 XtFree((char *)save_result);
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2843 save_result = (char_u *)*value;
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2844 save_length = *length;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2845 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2846 else if (*target == vimenc_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2847 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2848 int l = STRLEN(p_enc);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2849
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2850 save_result[0] = motion_type;
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2851 STRCPY(save_result + 1, p_enc);
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2852 mch_memmove(save_result + l + 2, string, (size_t)(*length - l - 2));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2853 *type = vimenc_atom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2854 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2855 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2856 {
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2857 save_result[0] = motion_type;
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2858 mch_memmove(save_result + 1, string, (size_t)(*length - 1));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2859 *type = vim_atom;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2860 }
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2861 *format = 8; // 8 bits per char
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2862 vim_free(string);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2863 return True;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2864 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2865
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2866 static void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2867 clip_x11_lose_ownership_cb(Widget w UNUSED, Atom *sel_atom)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2868 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2869 if (*sel_atom == clip_plus.sel_atom)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2870 clip_lose_selection(&clip_plus);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2871 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2872 clip_lose_selection(&clip_star);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2873 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2874
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2875 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
2876 clip_x11_lose_selection(Widget myShell, Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2877 {
4209
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
2878 XtDisownSelection(myShell, cbd->sel_atom,
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
2879 XtLastTimestampProcessed(XtDisplay(myShell)));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2880 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2881
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2882 static void
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2883 clip_x11_notify_cb(Widget w UNUSED, Atom *sel_atom UNUSED, Atom *target UNUSED)
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2884 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2885 // To prevent automatically freeing the selection value.
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2886 }
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2887
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2888 int
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
2889 clip_x11_own_selection(Widget myShell, Clipboard_T *cbd)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2890 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2891 // When using the GUI we have proper timestamps, use the one of the last
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2892 // event. When in the console we don't get events (the terminal gets
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2893 // them), Get the time by a zero-length append, clip_x11_timestamp_cb will
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2894 // be called with the current timestamp.
2586
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2895 #ifdef FEAT_GUI
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2896 if (gui.in_use)
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2897 {
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2898 if (XtOwnSelection(myShell, cbd->sel_atom,
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2899 XtLastTimestampProcessed(XtDisplay(myShell)),
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2900 clip_x11_convert_selection_cb, clip_x11_lose_ownership_cb,
11709
c3227699ad4d patch 8.0.0737: crash when X11 selection is very big
Christian Brabandt <cb@256bit.org>
parents: 11273
diff changeset
2901 clip_x11_notify_cb) == False)
3312
b7811ab264bf updated for version 7.3.423
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
2902 return FAIL;
2586
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2903 }
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2904 else
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2905 #endif
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2906 {
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2907 if (!XChangeProperty(XtDisplay(myShell), XtWindow(myShell),
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2908 cbd->sel_atom, timestamp_atom, 32, PropModeAppend, NULL, 0))
3312
b7811ab264bf updated for version 7.3.423
Bram Moolenaar <bram@vim.org>
parents: 2935
diff changeset
2909 return FAIL;
2586
538cd3220874 updated for version 7.3.011
Bram Moolenaar <bram@vim.org>
parents: 2520
diff changeset
2910 }
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2911 // Flush is required in a terminal as nothing else is doing it.
2270
917fff7bc09d Fixes for time in clipboard request. Also fix ownership. (David Fries)
Bram Moolenaar <bram@vim.org>
parents: 2250
diff changeset
2912 XFlush(XtDisplay(myShell));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2913 return OK;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2914 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2915
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2916 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2917 * Send the current selection to the clipboard. Do nothing for X because we
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2918 * will fill in the selection only when requested by another app.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2919 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2920 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
2921 clip_x11_set_selection(Clipboard_T *cbd UNUSED)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2922 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2923 }
4209
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
2924
15555
d89c5b339c2a patch 8.1.0785: depending on the configuration some functions are unused
Bram Moolenaar <Bram@vim.org>
parents: 15543
diff changeset
2925 #if (defined(FEAT_X11) && defined(FEAT_XCLIPBOARD) && defined(USE_SYSTEM)) \
d89c5b339c2a patch 8.1.0785: depending on the configuration some functions are unused
Bram Moolenaar <Bram@vim.org>
parents: 15543
diff changeset
2926 || defined(PROTO)
17789
0f7ae8010787 patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents: 17754
diff changeset
2927 static int
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
2928 clip_x11_owner_exists(Clipboard_T *cbd)
4209
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
2929 {
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
2930 return XGetSelectionOwner(X_DISPLAY, cbd->sel_atom) != None;
fb533fb6c015 updated for version 7.3.856
Bram Moolenaar <bram@vim.org>
parents: 4201
diff changeset
2931 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2932 #endif
15555
d89c5b339c2a patch 8.1.0785: depending on the configuration some functions are unused
Bram Moolenaar <Bram@vim.org>
parents: 15543
diff changeset
2933 #endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2934
1924
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2935 #if defined(FEAT_XCLIPBOARD) || defined(FEAT_GUI_X11) \
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2936 || defined(FEAT_GUI_GTK) || defined(PROTO)
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2937 /*
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2938 * Get the contents of the X CUT_BUFFER0 and put it in "cbd".
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2939 */
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2940 void
17063
3147c7c2e86b patch 8.1.1531: clipboard type name is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 17051
diff changeset
2941 yank_cut_buffer0(Display *dpy, Clipboard_T *cbd)
1924
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2942 {
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2943 int nbytes = 0;
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2944 char_u *buffer = (char_u *)XFetchBuffer(dpy, &nbytes, 0);
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2945
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2946 if (nbytes > 0)
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2947 {
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2948 int done = FALSE;
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2949
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2950 // CUT_BUFFER0 is supposed to be always latin1. Convert to 'enc' when
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2951 // using a multi-byte encoding. Conversion between two 8-bit
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2952 // character sets usually fails and the text might actually be in
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2953 // 'enc' anyway.
1924
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2954 if (has_mbyte)
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2955 {
2047
85da03763130 updated for version 7.2.333
Bram Moolenaar <bram@zimbu.org>
parents: 1961
diff changeset
2956 char_u *conv_buf;
1924
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2957 vimconv_T vc;
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2958
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2959 vc.vc_type = CONV_NONE;
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2960 if (convert_setup(&vc, (char_u *)"latin1", p_enc) == OK)
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2961 {
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2962 conv_buf = string_convert(&vc, buffer, &nbytes);
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2963 if (conv_buf != NULL)
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2964 {
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2965 clip_yank_selection(MCHAR, conv_buf, (long)nbytes, cbd);
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2966 vim_free(conv_buf);
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2967 done = TRUE;
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2968 }
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2969 convert_setup(&vc, NULL, NULL);
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2970 }
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2971 }
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2972 if (!done) // use the text without conversion
1924
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2973 clip_yank_selection(MCHAR, buffer, (long)nbytes, cbd);
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2974 XFree((void *)buffer);
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2975 if (p_verbose > 0)
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2976 {
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2977 verbose_enter();
15543
dd725a8ab112 patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15510
diff changeset
2978 verb_msg(_("Used CUT_BUFFER0 instead of empty selection"));
1924
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2979 verbose_leave();
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2980 }
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2981 }
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2982 }
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2983 #endif
75a69023117c updated for version 7.2-221
vimboss
parents: 1883
diff changeset
2984
15868
7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15665
diff changeset
2985 #if defined(FEAT_GUI) || defined(MSWIN) || defined(PROTO)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2986 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2987 * Called when focus changed. Used for the GUI or for systems where this can
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2988 * be done in the console (Win32).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2989 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2990 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
2991 ui_focus_change(
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2992 int in_focus) // TRUE if focus gained.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2993 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2994 static time_t last_time = (time_t)0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2995 int need_redraw = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2996
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2997 // When activated: Check if any file was modified outside of Vim.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2998 // Only do this when not done within the last two seconds (could get
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
2999 // several events in a row).
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3000 if (in_focus && last_time + 2 < time(NULL))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3001 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3002 need_redraw = check_timestamps(
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3003 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3004 gui.in_use
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3005 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3006 FALSE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3007 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3008 );
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3009 last_time = time(NULL);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3010 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3011
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3012 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3013 * Fire the focus gained/lost autocommand.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3014 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3015 need_redraw |= apply_autocmds(in_focus ? EVENT_FOCUSGAINED
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3016 : EVENT_FOCUSLOST, NULL, NULL, FALSE, curbuf);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3017
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3018 if (need_redraw)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3019 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3020 // Something was executed, make sure the cursor is put back where it
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3021 // belongs.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3022 need_wait_return = FALSE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3023
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3024 if (State & CMDLINE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3025 redrawcmdline();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3026 else if (State == HITRETURN || State == SETWSIZE || State == ASKMORE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3027 || State == EXTERNCMD || State == CONFIRM || exmode_active)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3028 repeat_message();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3029 else if ((State & NORMAL) || (State & INSERT))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3030 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3031 if (must_redraw != 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3032 update_screen(0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3033 setcursor();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3034 }
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3035 cursor_on(); // redrawing may have switched it off
13150
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 13060
diff changeset
3036 out_flush_cursor(FALSE, TRUE);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3037 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3038 if (gui.in_use)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3039 gui_update_scrollbars(FALSE);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3040 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3041 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3042 #ifdef FEAT_TITLE
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3043 // File may have been changed from 'readonly' to 'noreadonly'
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3044 if (need_maketitle)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3045 maketitle();
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3046 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3047 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3048 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3049
13380
69517d67421f patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents: 13373
diff changeset
3050 #if defined(HAVE_INPUT_METHOD) || defined(PROTO)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3051 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3052 * Save current Input Method status to specified place.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3053 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3054 void
7835
4d7ce6c03fda commit https://github.com/vim/vim/commit/764b23c8fd3369cb05ae9122abf3ca16fec539d7
Christian Brabandt <cb@256bit.org>
parents: 7805
diff changeset
3055 im_save_status(long *psave)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3056 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3057 // Don't save when 'imdisable' is set or "xic" is NULL, IM is always
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3058 // disabled then (but might start later).
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3059 // Also don't save when inside a mapping, vgetc_im_active has not been set
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3060 // then.
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3061 // And don't save when the keys were stuffed (e.g., for a "." command).
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3062 // And don't save when the GUI is running but our window doesn't have
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3063 // input focus (e.g., when a find dialog is open).
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3064 if (!p_imdisable && KeyTyped && !KeyStuffed
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3065 # ifdef FEAT_XIM
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3066 && xic != NULL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3067 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3068 # ifdef FEAT_GUI
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3069 && (!gui.in_use || gui.in_focus)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3070 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3071 )
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3072 {
18816
15539899a112 patch 8.1.2396: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
3073 // Do save when IM is on, or IM is off and saved status is on.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3074 if (vgetc_im_active)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3075 *psave = B_IMODE_IM;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3076 else if (*psave == B_IMODE_IM)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3077 *psave = B_IMODE_NONE;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3078 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3079 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3080 #endif