Mercurial > vim
annotate src/ex_cmds.c @ 15300:890203d87ee5 v8.1.0658
patch 8.1.0658: deleting signs and completion for :sign is insufficient
commit https://github.com/vim/vim/commit/7d83bf4f2b785b46d87c7bc376fc9d0a862af782
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Dec 29 18:53:55 2018 +0100
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Problem: Deleting signs and completion for :sign is insufficient.
Solution: Add deleting signs in a specified or any group from the current
cursor location. Add group and priority to sign command
completion. Add tests for different sign unplace commands. Update
help text. Add tests for sign jump with group. Update help for
sign jump. (Yegappan Lakshmanan, closes #3731)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Sat, 29 Dec 2018 19:00:08 +0100 |
| parents | a6319aca721b |
| children | c6c306c5027f |
| rev | line source |
|---|---|
|
10042
4aead6a9b7a9
commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47
Christian Brabandt <cb@256bit.org>
parents:
10021
diff
changeset
|
1 /* vi:set ts=8 sts=4 sw=4 noet: |
| 7 | 2 * |
| 3 * VIM - Vi IMproved by Bram Moolenaar | |
| 4 * | |
| 5 * Do ":help uganda" in Vim to read copying and usage conditions. | |
| 6 * Do ":help credits" in Vim to see a list of people who contributed. | |
| 7 * See README.txt for an overview of the Vim source code. | |
| 8 */ | |
| 9 | |
| 10 /* | |
| 11 * ex_cmds.c: some functions for command line commands | |
| 12 */ | |
| 13 | |
| 14 #include "vim.h" | |
| 15 #include "version.h" | |
| 16 | |
|
7691
fd4175b669e2
commit https://github.com/vim/vim/commit/17576a1e33d71b5602cee86bf220a806c8412605
Christian Brabandt <cb@256bit.org>
parents:
7689
diff
changeset
|
17 #ifdef FEAT_FLOAT |
|
fd4175b669e2
commit https://github.com/vim/vim/commit/17576a1e33d71b5602cee86bf220a806c8412605
Christian Brabandt <cb@256bit.org>
parents:
7689
diff
changeset
|
18 # include <float.h> |
|
fd4175b669e2
commit https://github.com/vim/vim/commit/17576a1e33d71b5602cee86bf220a806c8412605
Christian Brabandt <cb@256bit.org>
parents:
7689
diff
changeset
|
19 #endif |
|
fd4175b669e2
commit https://github.com/vim/vim/commit/17576a1e33d71b5602cee86bf220a806c8412605
Christian Brabandt <cb@256bit.org>
parents:
7689
diff
changeset
|
20 |
|
7799
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
21 static int linelen(int *has_tab); |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
22 static void do_filter(linenr_T line1, linenr_T line2, exarg_T *eap, char_u *cmd, int do_in, int do_out); |
| 7 | 23 #ifdef FEAT_VIMINFO |
|
7799
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
24 static char_u *viminfo_filename(char_u *); |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
25 static void do_viminfo(FILE *fp_in, FILE *fp_out, int flags); |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
26 static int viminfo_encoding(vir_T *virp); |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
27 static int read_viminfo_up_to_marks(vir_T *virp, int forceit, int writing); |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
28 #endif |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
29 |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
30 static int check_readonly(int *forceit, buf_T *buf); |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
31 static void delbuf_msg(char_u *name); |
| 7 | 32 static int |
| 33 #ifdef __BORLANDC__ | |
| 34 _RTLENTRYF | |
| 35 #endif | |
|
7799
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
36 help_compare(const void *s1, const void *s2); |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
37 static void prepare_help_buffer(void); |
| 7 | 38 |
| 39 /* | |
| 40 * ":ascii" and "ga". | |
| 41 */ | |
| 42 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
43 do_ascii(exarg_T *eap UNUSED) |
| 7 | 44 { |
| 45 int c; | |
| 1784 | 46 int cval; |
| 7 | 47 char buf1[20]; |
| 48 char buf2[20]; | |
| 49 char_u buf3[7]; | |
|
13359
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
50 #ifdef FEAT_DIGRAPHS |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
51 char_u *dig; |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
52 #endif |
| 7 | 53 #ifdef FEAT_MBYTE |
| 714 | 54 int cc[MAX_MCO]; |
| 55 int ci = 0; | |
| 7 | 56 int len; |
| 57 | |
| 58 if (enc_utf8) | |
| 714 | 59 c = utfc_ptr2char(ml_get_cursor(), cc); |
| 7 | 60 else |
| 61 #endif | |
| 62 c = gchar_cursor(); | |
| 63 if (c == NUL) | |
| 64 { | |
| 65 MSG("NUL"); | |
| 66 return; | |
| 67 } | |
| 68 | |
| 69 #ifdef FEAT_MBYTE | |
| 70 IObuff[0] = NUL; | |
| 71 if (!has_mbyte || (enc_dbcs != 0 && c < 0x100) || c < 0x80) | |
| 72 #endif | |
| 73 { | |
| 74 if (c == NL) /* NUL is stored as NL */ | |
| 75 c = NUL; | |
| 1784 | 76 if (c == CAR && get_fileformat(curbuf) == EOL_MAC) |
| 77 cval = NL; /* NL is stored as CR */ | |
| 78 else | |
| 79 cval = c; | |
| 7 | 80 if (vim_isprintc_strict(c) && (c < ' ' |
| 81 #ifndef EBCDIC | |
| 82 || c > '~' | |
| 83 #endif | |
| 84 )) | |
| 85 { | |
| 86 transchar_nonprint(buf3, c); | |
| 1872 | 87 vim_snprintf(buf1, sizeof(buf1), " <%s>", (char *)buf3); |
| 7 | 88 } |
| 89 else | |
| 90 buf1[0] = NUL; | |
| 91 #ifndef EBCDIC | |
| 92 if (c >= 0x80) | |
| 1872 | 93 vim_snprintf(buf2, sizeof(buf2), " <M-%s>", |
| 94 (char *)transchar(c & 0x7f)); | |
| 7 | 95 else |
| 96 #endif | |
| 97 buf2[0] = NUL; | |
|
13359
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
98 #ifdef FEAT_DIGRAPHS |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
99 dig = get_digraph_for_char(cval); |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
100 if (dig != NULL) |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
101 vim_snprintf((char *)IObuff, IOSIZE, |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
102 _("<%s>%s%s %d, Hex %02x, Oct %03o, Digr %s"), |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
103 transchar(c), buf1, buf2, cval, cval, cval, dig); |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
104 else |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
105 #endif |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
106 vim_snprintf((char *)IObuff, IOSIZE, |
| 274 | 107 _("<%s>%s%s %d, Hex %02x, Octal %03o"), |
| 1784 | 108 transchar(c), buf1, buf2, cval, cval, cval); |
| 7 | 109 #ifdef FEAT_MBYTE |
| 963 | 110 if (enc_utf8) |
| 111 c = cc[ci++]; | |
| 112 else | |
| 113 c = 0; | |
| 7 | 114 #endif |
| 115 } | |
| 116 | |
| 117 #ifdef FEAT_MBYTE | |
| 118 /* Repeat for combining characters. */ | |
| 119 while (has_mbyte && (c >= 0x100 || (enc_utf8 && c >= 0x80))) | |
| 120 { | |
| 121 len = (int)STRLEN(IObuff); | |
| 122 /* This assumes every multi-byte char is printable... */ | |
| 123 if (len > 0) | |
| 124 IObuff[len++] = ' '; | |
| 125 IObuff[len++] = '<'; | |
| 963 | 126 if (enc_utf8 && utf_iscomposing(c) |
| 625 | 127 # ifdef USE_GUI |
| 7 | 128 && !gui.in_use |
| 625 | 129 # endif |
| 7 | 130 ) |
| 131 IObuff[len++] = ' '; /* draw composing char on top of a space */ | |
| 274 | 132 len += (*mb_char2bytes)(c, IObuff + len); |
|
13359
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
133 #ifdef FEAT_DIGRAPHS |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
134 dig = get_digraph_for_char(c); |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
135 if (dig != NULL) |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
136 vim_snprintf((char *)IObuff + len, IOSIZE - len, |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
137 c < 0x10000 ? _("> %d, Hex %04x, Oct %o, Digr %s") |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
138 : _("> %d, Hex %08x, Oct %o, Digr %s"), |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
139 c, c, c, dig); |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
140 else |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
141 #endif |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
142 vim_snprintf((char *)IObuff + len, IOSIZE - len, |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
143 c < 0x10000 ? _("> %d, Hex %04x, Octal %o") |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
144 : _("> %d, Hex %08x, Octal %o"), |
|
81c348d40312
patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents:
13302
diff
changeset
|
145 c, c, c); |
| 714 | 146 if (ci == MAX_MCO) |
| 147 break; | |
| 963 | 148 if (enc_utf8) |
| 149 c = cc[ci++]; | |
| 150 else | |
| 151 c = 0; | |
| 7 | 152 } |
| 153 #endif | |
| 154 | |
| 155 msg(IObuff); | |
| 156 } | |
| 157 | |
| 158 /* | |
| 159 * ":left", ":center" and ":right": align text. | |
| 160 */ | |
| 161 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
162 ex_align(exarg_T *eap) |
| 7 | 163 { |
| 164 pos_T save_curpos; | |
| 165 int len; | |
| 166 int indent = 0; | |
| 167 int new_indent; | |
| 168 int has_tab; | |
| 169 int width; | |
| 170 | |
| 171 #ifdef FEAT_RIGHTLEFT | |
| 172 if (curwin->w_p_rl) | |
| 173 { | |
| 174 /* switch left and right aligning */ | |
| 175 if (eap->cmdidx == CMD_right) | |
| 176 eap->cmdidx = CMD_left; | |
| 177 else if (eap->cmdidx == CMD_left) | |
| 178 eap->cmdidx = CMD_right; | |
| 179 } | |
| 180 #endif | |
| 181 | |
| 182 width = atoi((char *)eap->arg); | |
| 183 save_curpos = curwin->w_cursor; | |
| 184 if (eap->cmdidx == CMD_left) /* width is used for new indent */ | |
| 185 { | |
| 186 if (width >= 0) | |
| 187 indent = width; | |
| 188 } | |
| 189 else | |
| 190 { | |
| 191 /* | |
| 192 * if 'textwidth' set, use it | |
| 193 * else if 'wrapmargin' set, use it | |
| 194 * if invalid value, use 80 | |
| 195 */ | |
| 196 if (width <= 0) | |
| 197 width = curbuf->b_p_tw; | |
| 198 if (width == 0 && curbuf->b_p_wm > 0) | |
|
12515
972ea22c946f
patch 8.0.1136: W_WIDTH() is always the same
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
199 width = curwin->w_width - curbuf->b_p_wm; |
| 7 | 200 if (width <= 0) |
| 201 width = 80; | |
| 202 } | |
| 203 | |
| 204 if (u_save((linenr_T)(eap->line1 - 1), (linenr_T)(eap->line2 + 1)) == FAIL) | |
| 205 return; | |
| 206 | |
| 207 for (curwin->w_cursor.lnum = eap->line1; | |
| 208 curwin->w_cursor.lnum <= eap->line2; ++curwin->w_cursor.lnum) | |
| 209 { | |
| 210 if (eap->cmdidx == CMD_left) /* left align */ | |
| 211 new_indent = indent; | |
| 212 else | |
| 213 { | |
| 944 | 214 has_tab = FALSE; /* avoid uninit warnings */ |
| 7 | 215 len = linelen(eap->cmdidx == CMD_right ? &has_tab |
| 216 : NULL) - get_indent(); | |
| 217 | |
| 218 if (len <= 0) /* skip blank lines */ | |
| 219 continue; | |
| 220 | |
| 221 if (eap->cmdidx == CMD_center) | |
| 222 new_indent = (width - len) / 2; | |
| 223 else | |
| 224 { | |
| 225 new_indent = width - len; /* right align */ | |
| 226 | |
| 227 /* | |
| 228 * Make sure that embedded TABs don't make the text go too far | |
| 229 * to the right. | |
| 230 */ | |
| 231 if (has_tab) | |
| 232 while (new_indent > 0) | |
| 233 { | |
| 234 (void)set_indent(new_indent, 0); | |
| 235 if (linelen(NULL) <= width) | |
| 236 { | |
| 237 /* | |
| 238 * Now try to move the line as much as possible to | |
| 239 * the right. Stop when it moves too far. | |
| 240 */ | |
| 241 do | |
| 242 (void)set_indent(++new_indent, 0); | |
| 243 while (linelen(NULL) <= width); | |
| 244 --new_indent; | |
| 245 break; | |
| 246 } | |
| 247 --new_indent; | |
| 248 } | |
| 249 } | |
| 250 } | |
| 251 if (new_indent < 0) | |
| 252 new_indent = 0; | |
| 253 (void)set_indent(new_indent, 0); /* set indent */ | |
| 254 } | |
| 255 changed_lines(eap->line1, 0, eap->line2 + 1, 0L); | |
| 256 curwin->w_cursor = save_curpos; | |
| 257 beginline(BL_WHITE | BL_FIX); | |
| 258 } | |
| 259 | |
| 260 /* | |
| 261 * Get the length of the current line, excluding trailing white space. | |
| 262 */ | |
| 263 static int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
264 linelen(int *has_tab) |
| 7 | 265 { |
| 266 char_u *line; | |
| 267 char_u *first; | |
| 268 char_u *last; | |
| 269 int save; | |
| 270 int len; | |
| 271 | |
| 272 /* find the first non-blank character */ | |
| 273 line = ml_get_curline(); | |
| 274 first = skipwhite(line); | |
| 275 | |
| 276 /* find the character after the last non-blank character */ | |
| 277 for (last = first + STRLEN(first); | |
|
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11127
diff
changeset
|
278 last > first && VIM_ISWHITE(last[-1]); --last) |
| 7 | 279 ; |
| 280 save = *last; | |
| 281 *last = NUL; | |
| 282 len = linetabsize(line); /* get line length */ | |
| 283 if (has_tab != NULL) /* check for embedded TAB */ | |
|
14513
076b9632bda4
patch 8.1.0270: checking for a Tab in a line could be faster
Christian Brabandt <cb@256bit.org>
parents:
14443
diff
changeset
|
284 *has_tab = (vim_strchr(first, TAB) != NULL); |
| 7 | 285 *last = save; |
| 286 | |
| 287 return len; | |
| 288 } | |
| 289 | |
| 826 | 290 /* Buffer for two lines used during sorting. They are allocated to |
| 291 * contain the longest line being sorted. */ | |
| 292 static char_u *sortbuf1; | |
| 293 static char_u *sortbuf2; | |
| 284 | 294 |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
295 static int sort_ic; /* ignore case */ |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
296 static int sort_nr; /* sort on number */ |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
297 static int sort_rx; /* sort on regex instead of skipping it */ |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
298 #ifdef FEAT_FLOAT |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
299 static int sort_flt; /* sort on floating number */ |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
300 #endif |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
301 |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
302 static int sort_abort; /* flag to indicate if sorting has been interrupted */ |
| 294 | 303 |
| 304 /* Struct to store info to be sorted. */ | |
| 305 typedef struct | |
| 306 { | |
| 307 linenr_T lnum; /* line number */ | |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
308 union { |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
309 struct |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
310 { |
|
9389
32e34e574716
commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12
Christian Brabandt <cb@256bit.org>
parents:
9387
diff
changeset
|
311 varnumber_T start_col_nr; /* starting column number */ |
|
32e34e574716
commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12
Christian Brabandt <cb@256bit.org>
parents:
9387
diff
changeset
|
312 varnumber_T end_col_nr; /* ending column number */ |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
313 } line; |
|
9389
32e34e574716
commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12
Christian Brabandt <cb@256bit.org>
parents:
9387
diff
changeset
|
314 varnumber_T value; /* value if sorting by integer */ |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
315 #ifdef FEAT_FLOAT |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
316 float_T value_flt; /* value if sorting by float */ |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
317 #endif |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
318 } st_u; |
| 294 | 319 } sorti_T; |
| 284 | 320 |
| 321 static int | |
| 322 #ifdef __BORLANDC__ | |
| 323 _RTLENTRYF | |
| 324 #endif | |
|
7799
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
325 sort_compare(const void *s1, const void *s2); |
| 284 | 326 |
| 327 static int | |
| 328 #ifdef __BORLANDC__ | |
| 329 _RTLENTRYF | |
| 330 #endif | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
331 sort_compare(const void *s1, const void *s2) |
| 284 | 332 { |
| 294 | 333 sorti_T l1 = *(sorti_T *)s1; |
| 334 sorti_T l2 = *(sorti_T *)s2; | |
| 826 | 335 int result = 0; |
| 336 | |
| 337 /* If the user interrupts, there's no way to stop qsort() immediately, but | |
| 834 | 338 * if we return 0 every time, qsort will assume it's done sorting and |
| 339 * exit. */ | |
| 826 | 340 if (sort_abort) |
| 341 return 0; | |
| 342 fast_breakcheck(); | |
| 343 if (got_int) | |
| 344 sort_abort = TRUE; | |
| 345 | |
| 834 | 346 /* When sorting numbers "start_col_nr" is the number, not the column |
| 347 * number. */ | |
| 294 | 348 if (sort_nr) |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
349 result = l1.st_u.value == l2.st_u.value ? 0 |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
350 : l1.st_u.value > l2.st_u.value ? 1 : -1; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
351 #ifdef FEAT_FLOAT |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
352 else if (sort_flt) |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
353 result = l1.st_u.value_flt == l2.st_u.value_flt ? 0 |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
354 : l1.st_u.value_flt > l2.st_u.value_flt ? 1 : -1; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
355 #endif |
| 826 | 356 else |
| 357 { | |
| 834 | 358 /* We need to copy one line into "sortbuf1", because there is no |
| 359 * guarantee that the first pointer becomes invalid when obtaining the | |
| 360 * second one. */ | |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
361 STRNCPY(sortbuf1, ml_get(l1.lnum) + l1.st_u.line.start_col_nr, |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
362 l1.st_u.line.end_col_nr - l1.st_u.line.start_col_nr + 1); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
363 sortbuf1[l1.st_u.line.end_col_nr - l1.st_u.line.start_col_nr] = 0; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
364 STRNCPY(sortbuf2, ml_get(l2.lnum) + l2.st_u.line.start_col_nr, |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
365 l2.st_u.line.end_col_nr - l2.st_u.line.start_col_nr + 1); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
366 sortbuf2[l2.st_u.line.end_col_nr - l2.st_u.line.start_col_nr] = 0; |
| 826 | 367 |
| 834 | 368 result = sort_ic ? STRICMP(sortbuf1, sortbuf2) |
| 369 : STRCMP(sortbuf1, sortbuf2); | |
| 370 } | |
| 371 | |
| 372 /* If two lines have the same value, preserve the original line order. */ | |
| 826 | 373 if (result == 0) |
| 834 | 374 return (int)(l1.lnum - l2.lnum); |
| 375 return result; | |
| 284 | 376 } |
| 377 | |
| 378 /* | |
| 379 * ":sort". | |
| 380 */ | |
| 381 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
382 ex_sort(exarg_T *eap) |
| 284 | 383 { |
| 384 regmatch_T regmatch; | |
| 385 int len; | |
| 386 linenr_T lnum; | |
| 387 long maxlen = 0; | |
| 294 | 388 sorti_T *nrs; |
| 1872 | 389 size_t count = (size_t)(eap->line2 - eap->line1 + 1); |
| 294 | 390 size_t i; |
| 284 | 391 char_u *p; |
| 392 char_u *s; | |
| 826 | 393 char_u *s2; |
| 394 char_u c; /* temporary character storage */ | |
| 284 | 395 int unique = FALSE; |
| 396 long deleted; | |
| 826 | 397 colnr_T start_col; |
| 398 colnr_T end_col; | |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
399 int sort_what = 0; |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
400 int format_found = 0; |
|
14206
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
401 int change_occurred = FALSE; // Buffer contents changed. |
| 284 | 402 |
| 1538 | 403 /* Sorting one line is really quick! */ |
| 404 if (count <= 1) | |
| 405 return; | |
| 406 | |
| 284 | 407 if (u_save((linenr_T)(eap->line1 - 1), (linenr_T)(eap->line2 + 1)) == FAIL) |
| 408 return; | |
| 826 | 409 sortbuf1 = NULL; |
| 410 sortbuf2 = NULL; | |
| 284 | 411 regmatch.regprog = NULL; |
| 294 | 412 nrs = (sorti_T *)lalloc((long_u)(count * sizeof(sorti_T)), TRUE); |
| 284 | 413 if (nrs == NULL) |
| 826 | 414 goto sortend; |
| 415 | |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
416 sort_abort = sort_ic = sort_rx = sort_nr = 0; |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
417 #ifdef FEAT_FLOAT |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
418 sort_flt = 0; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
419 #endif |
| 294 | 420 |
| 284 | 421 for (p = eap->arg; *p != NUL; ++p) |
| 422 { | |
|
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11127
diff
changeset
|
423 if (VIM_ISWHITE(*p)) |
| 284 | 424 ; |
| 425 else if (*p == 'i') | |
| 426 sort_ic = TRUE; | |
| 826 | 427 else if (*p == 'r') |
| 428 sort_rx = TRUE; | |
| 294 | 429 else if (*p == 'n') |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
430 { |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
431 sort_nr = 1; |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
432 ++format_found; |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
433 } |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
434 #ifdef FEAT_FLOAT |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
435 else if (*p == 'f') |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
436 { |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
437 sort_flt = 1; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
438 ++format_found; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
439 } |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
440 #endif |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
441 else if (*p == 'b') |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
442 { |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
443 sort_what = STR2NR_BIN + STR2NR_FORCE; |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
444 ++format_found; |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
445 } |
| 294 | 446 else if (*p == 'o') |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
447 { |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
448 sort_what = STR2NR_OCT + STR2NR_FORCE; |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
449 ++format_found; |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
450 } |
| 294 | 451 else if (*p == 'x') |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
452 { |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
453 sort_what = STR2NR_HEX + STR2NR_FORCE; |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
454 ++format_found; |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
455 } |
| 284 | 456 else if (*p == 'u') |
| 457 unique = TRUE; | |
| 289 | 458 else if (*p == '"') /* comment start */ |
| 459 break; | |
| 460 else if (check_nextcmd(p) != NULL) | |
| 461 { | |
| 462 eap->nextcmd = check_nextcmd(p); | |
| 463 break; | |
| 464 } | |
| 465 else if (!ASCII_ISALPHA(*p) && regmatch.regprog == NULL) | |
| 284 | 466 { |
| 467 s = skip_regexp(p + 1, *p, TRUE, NULL); | |
| 468 if (*s != *p) | |
| 469 { | |
| 470 EMSG(_(e_invalpat)); | |
| 826 | 471 goto sortend; |
| 284 | 472 } |
| 473 *s = NUL; | |
| 1314 | 474 /* Use last search pattern if sort pattern is empty. */ |
| 4199 | 475 if (s == p + 1) |
| 476 { | |
| 477 if (last_search_pat() == NULL) | |
| 478 { | |
| 479 EMSG(_(e_noprevre)); | |
| 480 goto sortend; | |
| 481 } | |
| 1314 | 482 regmatch.regprog = vim_regcomp(last_search_pat(), RE_MAGIC); |
| 4199 | 483 } |
| 1314 | 484 else |
| 485 regmatch.regprog = vim_regcomp(p + 1, RE_MAGIC); | |
| 284 | 486 if (regmatch.regprog == NULL) |
| 826 | 487 goto sortend; |
| 289 | 488 p = s; /* continue after the regexp */ |
| 284 | 489 regmatch.rm_ic = p_ic; |
| 490 } | |
| 491 else | |
| 492 { | |
| 493 EMSG2(_(e_invarg2), p); | |
| 826 | 494 goto sortend; |
| 284 | 495 } |
| 496 } | |
| 497 | |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
498 /* Can only have one of 'n', 'b', 'o' and 'x'. */ |
|
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
499 if (format_found > 1) |
| 294 | 500 { |
| 501 EMSG(_(e_invarg)); | |
| 826 | 502 goto sortend; |
| 294 | 503 } |
| 504 | |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
505 /* From here on "sort_nr" is used as a flag for any integer number |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
506 * sorting. */ |
|
7447
ad432f8f68fb
commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b
Christian Brabandt <cb@256bit.org>
parents:
7412
diff
changeset
|
507 sort_nr += sort_what; |
| 294 | 508 |
| 284 | 509 /* |
| 294 | 510 * Make an array with all line numbers. This avoids having to copy all |
| 284 | 511 * the lines into allocated memory. |
| 826 | 512 * When sorting on strings "start_col_nr" is the offset in the line, for |
| 513 * numbers sorting it's the number to sort on. This means the pattern | |
| 514 * matching and number conversion only has to be done once per line. | |
| 294 | 515 * Also get the longest line length for allocating "sortbuf". |
| 284 | 516 */ |
| 517 for (lnum = eap->line1; lnum <= eap->line2; ++lnum) | |
| 518 { | |
| 519 s = ml_get(lnum); | |
| 835 | 520 len = (int)STRLEN(s); |
| 284 | 521 if (maxlen < len) |
| 522 maxlen = len; | |
| 294 | 523 |
| 826 | 524 start_col = 0; |
| 525 end_col = len; | |
| 294 | 526 if (regmatch.regprog != NULL && vim_regexec(®match, s, 0)) |
| 826 | 527 { |
| 528 if (sort_rx) | |
| 529 { | |
| 835 | 530 start_col = (colnr_T)(regmatch.startp[0] - s); |
| 531 end_col = (colnr_T)(regmatch.endp[0] - s); | |
| 826 | 532 } |
| 533 else | |
| 835 | 534 start_col = (colnr_T)(regmatch.endp[0] - s); |
| 826 | 535 } |
| 294 | 536 else |
| 826 | 537 if (regmatch.regprog != NULL) |
| 538 end_col = 0; | |
| 294 | 539 |
|
7844
6669966db9e9
commit https://github.com/vim/vim/commit/937204a9175d0fe2f13c8bc4ebeb043003d7e7d7
Christian Brabandt <cb@256bit.org>
parents:
7819
diff
changeset
|
540 if (sort_nr |
|
6669966db9e9
commit https://github.com/vim/vim/commit/937204a9175d0fe2f13c8bc4ebeb043003d7e7d7
Christian Brabandt <cb@256bit.org>
parents:
7819
diff
changeset
|
541 #ifdef FEAT_FLOAT |
|
6669966db9e9
commit https://github.com/vim/vim/commit/937204a9175d0fe2f13c8bc4ebeb043003d7e7d7
Christian Brabandt <cb@256bit.org>
parents:
7819
diff
changeset
|
542 || sort_flt |
|
6669966db9e9
commit https://github.com/vim/vim/commit/937204a9175d0fe2f13c8bc4ebeb043003d7e7d7
Christian Brabandt <cb@256bit.org>
parents:
7819
diff
changeset
|
543 #endif |
|
6669966db9e9
commit https://github.com/vim/vim/commit/937204a9175d0fe2f13c8bc4ebeb043003d7e7d7
Christian Brabandt <cb@256bit.org>
parents:
7819
diff
changeset
|
544 ) |
| 294 | 545 { |
| 826 | 546 /* Make sure vim_str2nr doesn't read any digits past the end |
| 547 * of the match, by temporarily terminating the string there */ | |
| 548 s2 = s + end_col; | |
| 549 c = *s2; | |
| 2606 | 550 *s2 = NUL; |
| 294 | 551 /* Sorting on number: Store the number itself. */ |
| 1687 | 552 p = s + start_col; |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
553 if (sort_nr) |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
554 { |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
555 if (sort_what & STR2NR_HEX) |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
556 s = skiptohex(p); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
557 else if (sort_what & STR2NR_BIN) |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
558 s = skiptobin(p); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
559 else |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
560 s = skiptodigit(p); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
561 if (s > p && s[-1] == '-') |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
562 --s; /* include preceding negative sign */ |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
563 if (*s == NUL) |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
564 /* empty line should sort before any number */ |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
565 nrs[lnum - eap->line1].st_u.value = -MAXLNUM; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
566 else |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
567 vim_str2nr(s, NULL, NULL, sort_what, |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
568 &nrs[lnum - eap->line1].st_u.value, NULL, 0); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
569 } |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
570 #ifdef FEAT_FLOAT |
| 294 | 571 else |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
572 { |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
573 s = skipwhite(p); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
574 if (*s == '+') |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
575 s = skipwhite(s + 1); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
576 |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
577 if (*s == NUL) |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
578 /* empty line should sort before any number */ |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
579 nrs[lnum - eap->line1].st_u.value_flt = -DBL_MAX; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
580 else |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
581 nrs[lnum - eap->line1].st_u.value_flt = |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
582 strtod((char *)s, NULL); |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
583 } |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
584 #endif |
| 2606 | 585 *s2 = c; |
| 294 | 586 } |
| 587 else | |
| 826 | 588 { |
| 294 | 589 /* Store the column to sort at. */ |
|
7689
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
590 nrs[lnum - eap->line1].st_u.line.start_col_nr = start_col; |
|
20dc2763a3b9
commit https://github.com/vim/vim/commit/f7edf40448a09e04eec3bd05e043f7fea93b07c9
Christian Brabandt <cb@256bit.org>
parents:
7664
diff
changeset
|
591 nrs[lnum - eap->line1].st_u.line.end_col_nr = end_col; |
| 826 | 592 } |
| 294 | 593 |
| 594 nrs[lnum - eap->line1].lnum = lnum; | |
| 481 | 595 |
| 596 if (regmatch.regprog != NULL) | |
| 597 fast_breakcheck(); | |
| 598 if (got_int) | |
| 826 | 599 goto sortend; |
| 284 | 600 } |
| 601 | |
| 294 | 602 /* Allocate a buffer that can hold the longest line. */ |
| 826 | 603 sortbuf1 = alloc((unsigned)maxlen + 1); |
| 604 if (sortbuf1 == NULL) | |
| 605 goto sortend; | |
| 606 sortbuf2 = alloc((unsigned)maxlen + 1); | |
| 607 if (sortbuf2 == NULL) | |
| 608 goto sortend; | |
| 284 | 609 |
| 481 | 610 /* Sort the array of line numbers. Note: can't be interrupted! */ |
| 294 | 611 qsort((void *)nrs, count, sizeof(sorti_T), sort_compare); |
| 284 | 612 |
| 826 | 613 if (sort_abort) |
| 614 goto sortend; | |
| 615 | |
| 284 | 616 /* Insert the lines in the sorted order below the last one. */ |
| 617 lnum = eap->line2; | |
| 618 for (i = 0; i < count; ++i) | |
| 619 { | |
|
14206
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
620 linenr_T get_lnum = nrs[eap->forceit ? count - i - 1 : i].lnum; |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
621 |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
622 // If the original line number of the line being placed is not the same |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
623 // as "lnum" (accounting for offset), we know that the buffer changed. |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
624 if (get_lnum + ((linenr_T)count - 1) != lnum) |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
625 change_occurred = TRUE; |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
626 |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
627 s = ml_get(get_lnum); |
| 284 | 628 if (!unique || i == 0 |
| 826 | 629 || (sort_ic ? STRICMP(s, sortbuf1) : STRCMP(s, sortbuf1)) != 0) |
| 284 | 630 { |
|
14206
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
631 // Copy the line into a buffer, it may become invalid in |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
632 // ml_append(). And it's needed for "unique". |
|
7340
645abb8d8daf
commit https://github.com/vim/vim/commit/75e3ad019933f4879137775549261bf51985ab7d
Christian Brabandt <cb@256bit.org>
parents:
7226
diff
changeset
|
633 STRCPY(sortbuf1, s); |
|
645abb8d8daf
commit https://github.com/vim/vim/commit/75e3ad019933f4879137775549261bf51985ab7d
Christian Brabandt <cb@256bit.org>
parents:
7226
diff
changeset
|
634 if (ml_append(lnum++, sortbuf1, (colnr_T)0, FALSE) == FAIL) |
| 284 | 635 break; |
| 636 } | |
| 481 | 637 fast_breakcheck(); |
| 638 if (got_int) | |
| 826 | 639 goto sortend; |
| 284 | 640 } |
| 641 | |
| 642 /* delete the original lines if appending worked */ | |
| 643 if (i == count) | |
| 644 for (i = 0; i < count; ++i) | |
| 645 ml_delete(eap->line1, FALSE); | |
| 646 else | |
| 647 count = 0; | |
| 648 | |
| 294 | 649 /* Adjust marks for deleted (or added) lines and prepare for displaying. */ |
| 835 | 650 deleted = (long)(count - (lnum - eap->line2)); |
| 284 | 651 if (deleted > 0) |
|
14808
3d0b6e2a3a01
patch 8.1.0416: sort doesn't report deleted lines
Christian Brabandt <cb@256bit.org>
parents:
14730
diff
changeset
|
652 { |
| 284 | 653 mark_adjust(eap->line2 - deleted, eap->line2, (long)MAXLNUM, -deleted); |
|
14808
3d0b6e2a3a01
patch 8.1.0416: sort doesn't report deleted lines
Christian Brabandt <cb@256bit.org>
parents:
14730
diff
changeset
|
654 msgmore(-deleted); |
|
3d0b6e2a3a01
patch 8.1.0416: sort doesn't report deleted lines
Christian Brabandt <cb@256bit.org>
parents:
14730
diff
changeset
|
655 } |
| 284 | 656 else if (deleted < 0) |
| 657 mark_adjust(eap->line2, MAXLNUM, -deleted, 0L); | |
|
14206
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
658 |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
659 if (change_occurred || deleted != 0) |
|
f2ab259ef88a
patch 8.1.0120: buffer 'modified' set even when :sort has no changes
Christian Brabandt <cb@256bit.org>
parents:
14194
diff
changeset
|
660 changed_lines(eap->line1, 0, eap->line2 + 1, -deleted); |
| 294 | 661 |
| 284 | 662 curwin->w_cursor.lnum = eap->line1; |
| 663 beginline(BL_WHITE | BL_FIX); | |
| 664 | |
| 826 | 665 sortend: |
| 284 | 666 vim_free(nrs); |
| 826 | 667 vim_free(sortbuf1); |
| 668 vim_free(sortbuf2); | |
|
4805
66803af09906
updated for version 7.3.1149
Bram Moolenaar <bram@vim.org>
parents:
4613
diff
changeset
|
669 vim_regfree(regmatch.regprog); |
| 481 | 670 if (got_int) |
| 671 EMSG(_(e_interr)); | |
| 284 | 672 } |
| 673 | |
| 7 | 674 /* |
| 675 * ":retab". | |
| 676 */ | |
| 677 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
678 ex_retab(exarg_T *eap) |
| 7 | 679 { |
| 680 linenr_T lnum; | |
| 681 int got_tab = FALSE; | |
| 682 long num_spaces = 0; | |
| 683 long num_tabs; | |
| 684 long len; | |
| 685 long col; | |
| 686 long vcol; | |
| 687 long start_col = 0; /* For start of white-space string */ | |
| 688 long start_vcol = 0; /* For start of white-space string */ | |
| 689 long old_len; | |
| 690 char_u *ptr; | |
| 691 char_u *new_line = (char_u *)1; /* init to non-NULL */ | |
| 692 int did_undo; /* called u_save for current line */ | |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
693 #ifdef FEAT_VARTABS |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
694 int *new_vts_array = NULL; |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
695 char_u *new_ts_str; /* string value of tab argument */ |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
696 #else |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
697 int temp; |
| 7 | 698 int new_ts; |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
699 #endif |
| 7 | 700 int save_list; |
| 701 linenr_T first_line = 0; /* first changed line */ | |
| 702 linenr_T last_line = 0; /* last changed line */ | |
| 703 | |
| 704 save_list = curwin->w_p_list; | |
| 705 curwin->w_p_list = 0; /* don't want list mode here */ | |
| 706 | |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
707 #ifdef FEAT_VARTABS |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
708 new_ts_str = eap->arg; |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
709 if (!tabstop_set(eap->arg, &new_vts_array)) |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
710 return; |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
711 while (vim_isdigit(*(eap->arg)) || *(eap->arg) == ',') |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
712 ++(eap->arg); |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
713 |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
714 // This ensures that either new_vts_array and new_ts_str are freshly |
|
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
715 // allocated, or new_vts_array points to an existing array and new_ts_str |
|
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
716 // is null. |
|
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
717 if (new_vts_array == NULL) |
|
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
718 { |
|
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
719 new_vts_array = curbuf->b_p_vts_array; |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
720 new_ts_str = NULL; |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
721 } |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
722 else |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
723 new_ts_str = vim_strnsave(new_ts_str, eap->arg - new_ts_str); |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
724 #else |
| 7 | 725 new_ts = getdigits(&(eap->arg)); |
| 726 if (new_ts < 0) | |
| 727 { | |
| 728 EMSG(_(e_positive)); | |
| 729 return; | |
| 730 } | |
| 731 if (new_ts == 0) | |
| 732 new_ts = curbuf->b_p_ts; | |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
733 #endif |
| 7 | 734 for (lnum = eap->line1; !got_int && lnum <= eap->line2; ++lnum) |
| 735 { | |
| 736 ptr = ml_get(lnum); | |
| 737 col = 0; | |
| 738 vcol = 0; | |
| 739 did_undo = FALSE; | |
| 740 for (;;) | |
| 741 { | |
|
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11127
diff
changeset
|
742 if (VIM_ISWHITE(ptr[col])) |
| 7 | 743 { |
| 744 if (!got_tab && num_spaces == 0) | |
| 745 { | |
| 746 /* First consecutive white-space */ | |
| 747 start_vcol = vcol; | |
| 748 start_col = col; | |
| 749 } | |
| 750 if (ptr[col] == ' ') | |
| 751 num_spaces++; | |
| 752 else | |
| 753 got_tab = TRUE; | |
| 754 } | |
| 755 else | |
| 756 { | |
| 757 if (got_tab || (eap->forceit && num_spaces > 1)) | |
| 758 { | |
| 759 /* Retabulate this string of white-space */ | |
| 760 | |
| 761 /* len is virtual length of white string */ | |
| 762 len = num_spaces = vcol - start_vcol; | |
| 763 num_tabs = 0; | |
| 764 if (!curbuf->b_p_et) | |
| 765 { | |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
766 #ifdef FEAT_VARTABS |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
767 int t, s; |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
768 |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
769 tabstop_fromto(start_vcol, vcol, |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
770 curbuf->b_p_ts, new_vts_array, &t, &s); |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
771 num_tabs = t; |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
772 num_spaces = s; |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
773 #else |
| 7 | 774 temp = new_ts - (start_vcol % new_ts); |
| 775 if (num_spaces >= temp) | |
| 776 { | |
| 777 num_spaces -= temp; | |
| 778 num_tabs++; | |
| 779 } | |
| 780 num_tabs += num_spaces / new_ts; | |
| 781 num_spaces -= (num_spaces / new_ts) * new_ts; | |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
782 #endif |
| 7 | 783 } |
| 784 if (curbuf->b_p_et || got_tab || | |
| 785 (num_spaces + num_tabs < len)) | |
| 786 { | |
| 787 if (did_undo == FALSE) | |
| 788 { | |
| 789 did_undo = TRUE; | |
| 790 if (u_save((linenr_T)(lnum - 1), | |
| 791 (linenr_T)(lnum + 1)) == FAIL) | |
| 792 { | |
| 793 new_line = NULL; /* flag out-of-memory */ | |
| 794 break; | |
| 795 } | |
| 796 } | |
| 797 | |
| 798 /* len is actual number of white characters used */ | |
| 799 len = num_spaces + num_tabs; | |
| 800 old_len = (long)STRLEN(ptr); | |
| 801 new_line = lalloc(old_len - col + start_col + len + 1, | |
| 802 TRUE); | |
| 803 if (new_line == NULL) | |
| 804 break; | |
| 805 if (start_col > 0) | |
| 806 mch_memmove(new_line, ptr, (size_t)start_col); | |
| 807 mch_memmove(new_line + start_col + len, | |
| 808 ptr + col, (size_t)(old_len - col + 1)); | |
| 809 ptr = new_line + start_col; | |
| 810 for (col = 0; col < len; col++) | |
| 811 ptr[col] = (col < num_tabs) ? '\t' : ' '; | |
| 812 ml_replace(lnum, new_line, FALSE); | |
| 813 if (first_line == 0) | |
| 814 first_line = lnum; | |
| 815 last_line = lnum; | |
| 816 ptr = new_line; | |
| 817 col = start_col + len; | |
| 818 } | |
| 819 } | |
| 820 got_tab = FALSE; | |
| 821 num_spaces = 0; | |
| 822 } | |
| 823 if (ptr[col] == NUL) | |
| 824 break; | |
| 825 vcol += chartabsize(ptr + col, (colnr_T)vcol); | |
| 826 #ifdef FEAT_MBYTE | |
| 827 if (has_mbyte) | |
| 474 | 828 col += (*mb_ptr2len)(ptr + col); |
| 7 | 829 else |
| 830 #endif | |
| 831 ++col; | |
| 832 } | |
| 833 if (new_line == NULL) /* out of memory */ | |
| 834 break; | |
| 835 line_breakcheck(); | |
| 836 } | |
| 837 if (got_int) | |
| 838 EMSG(_(e_interr)); | |
| 839 | |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
840 #ifdef FEAT_VARTABS |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
841 // If a single value was given then it can be considered equal to |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
842 // either the value of 'tabstop' or the value of 'vartabstop'. |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
843 if (tabstop_count(curbuf->b_p_vts_array) == 0 |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
844 && tabstop_count(new_vts_array) == 1 |
|
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
845 && curbuf->b_p_ts == tabstop_first(new_vts_array)) |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
846 ; /* not changed */ |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
847 else if (tabstop_count(curbuf->b_p_vts_array) > 0 |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
848 && tabstop_eq(curbuf->b_p_vts_array, new_vts_array)) |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
849 ; /* not changed */ |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
850 else |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
851 redraw_curbuf_later(NOT_VALID); |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
852 #else |
| 7 | 853 if (curbuf->b_p_ts != new_ts) |
| 854 redraw_curbuf_later(NOT_VALID); | |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
855 #endif |
| 7 | 856 if (first_line != 0) |
| 857 changed_lines(first_line, 0, last_line + 1, 0L); | |
| 858 | |
| 859 curwin->w_p_list = save_list; /* restore 'list' */ | |
| 860 | |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
861 #ifdef FEAT_VARTABS |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
862 if (new_ts_str != NULL) /* set the new tabstop */ |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
863 { |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
864 // If 'vartabstop' is in use or if the value given to retab has more |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
865 // than one tabstop then update 'vartabstop'. |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
866 int *old_vts_ary = curbuf->b_p_vts_array; |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
867 |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
868 if (tabstop_count(old_vts_ary) > 0 || tabstop_count(new_vts_array) > 1) |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
869 { |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
870 set_string_option_direct((char_u *)"vts", -1, new_ts_str, |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
871 OPT_FREE|OPT_LOCAL, 0); |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
872 curbuf->b_p_vts_array = new_vts_array; |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
873 vim_free(old_vts_ary); |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
874 } |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
875 else |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
876 { |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
877 // 'vartabstop' wasn't in use and a single value was given to |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
878 // retab then update 'tabstop'. |
|
14194
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
879 curbuf->b_p_ts = tabstop_first(new_vts_array); |
|
6fbb8dfb3389
patch 8.1.0114: confusing variable name
Christian Brabandt <cb@256bit.org>
parents:
14185
diff
changeset
|
880 vim_free(new_vts_array); |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
881 } |
|
14218
539b070778b0
patch 8.1.0126: various problems with 'vartabstop'
Christian Brabandt <cb@256bit.org>
parents:
14206
diff
changeset
|
882 vim_free(new_ts_str); |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
883 } |
|
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
884 #else |
| 7 | 885 curbuf->b_p_ts = new_ts; |
|
14175
2ad722003b36
patch 8.1.0105: all tab stops are the same
Christian Brabandt <cb@256bit.org>
parents:
14033
diff
changeset
|
886 #endif |
| 7 | 887 coladvance(curwin->w_curswant); |
| 888 | |
| 889 u_clearline(); | |
| 890 } | |
| 891 | |
| 892 /* | |
| 893 * :move command - move lines line1-line2 to line dest | |
| 894 * | |
| 895 * return FAIL for failure, OK otherwise | |
| 896 */ | |
| 897 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
898 do_move(linenr_T line1, linenr_T line2, linenr_T dest) |
| 7 | 899 { |
| 900 char_u *str; | |
| 901 linenr_T l; | |
|
15010
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
902 linenr_T extra; // Num lines added before line1 |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
903 linenr_T num_lines; // Num lines moved |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
904 linenr_T last_line; // Last line in file after adding new text |
| 6755 | 905 #ifdef FEAT_FOLDING |
|
11140
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
906 win_T *win; |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
907 tabpage_T *tp; |
| 6755 | 908 #endif |
| 7 | 909 |
| 910 if (dest >= line1 && dest < line2) | |
| 911 { | |
|
15010
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
912 EMSG(_("E134: Cannot move a range of lines into itself")); |
| 7 | 913 return FAIL; |
| 914 } | |
| 915 | |
|
15010
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
916 // Do nothing if we are not actually moving any lines. This will prevent |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
917 // the 'modified' flag from being set without cause. |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
918 if (dest == line1 - 1 || dest == line2) |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
919 { |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
920 // Move the cursor as if lines were moved (see below) to be backwards |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
921 // compatible. |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
922 if (dest >= line1) |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
923 curwin->w_cursor.lnum = dest; |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
924 else |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
925 curwin->w_cursor.lnum = dest + (line2 - line1) + 1; |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
926 |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
927 return OK; |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
928 } |
|
e3910b9827d0
patch 8.1.0516: :move command marks buffer modified when nothing changed
Bram Moolenaar <Bram@vim.org>
parents:
14917
diff
changeset
|
929 |
| 7 | 930 num_lines = line2 - line1 + 1; |
| 931 | |
| 932 /* | |
| 933 * First we copy the old text to its new location -- webb | |
| 934 * Also copy the flag that ":global" command uses. | |
| 935 */ | |
| 936 if (u_save(dest, dest + 1) == FAIL) | |
| 937 return FAIL; | |
| 938 for (extra = 0, l = line1; l <= line2; l++) | |
| 939 { | |
| 940 str = vim_strsave(ml_get(l + extra)); | |
| 941 if (str != NULL) | |
| 942 { | |
| 943 ml_append(dest + l - line1, str, (colnr_T)0, FALSE); | |
| 944 vim_free(str); | |
| 945 if (dest < line1) | |
| 946 extra++; | |
| 947 } | |
| 948 } | |
| 949 | |
| 950 /* | |
| 951 * Now we must be careful adjusting our marks so that we don't overlap our | |
| 952 * mark_adjust() calls. | |
| 953 * | |
| 954 * We adjust the marks within the old text so that they refer to the | |
| 955 * last lines of the file (temporarily), because we know no other marks | |
| 956 * will be set there since these line numbers did not exist until we added | |
| 957 * our new lines. | |
| 958 * | |
| 959 * Then we adjust the marks on lines between the old and new text positions | |
| 960 * (either forwards or backwards). | |
| 961 * | |
| 962 * And Finally we adjust the marks we put at the end of the file back to | |
| 963 * their final destination at the new text position -- webb | |
| 964 */ | |
| 965 last_line = curbuf->b_ml.ml_line_count; | |
|
11140
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
966 mark_adjust_nofold(line1, line2, last_line - line2, 0L); |
| 7 | 967 if (dest >= line2) |
| 968 { | |
|
11140
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
969 mark_adjust_nofold(line2 + 1, dest, -num_lines, 0L); |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
970 #ifdef FEAT_FOLDING |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
971 FOR_ALL_TAB_WINDOWS(tp, win) { |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
972 if (win->w_buffer == curbuf) |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
973 foldMoveRange(&win->w_folds, line1, line2, dest); |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
974 } |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
975 #endif |
| 7 | 976 curbuf->b_op_start.lnum = dest - num_lines + 1; |
| 977 curbuf->b_op_end.lnum = dest; | |
| 978 } | |
| 979 else | |
| 980 { | |
|
11140
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
981 mark_adjust_nofold(dest + 1, line1 - 1, num_lines, 0L); |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
982 #ifdef FEAT_FOLDING |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
983 FOR_ALL_TAB_WINDOWS(tp, win) { |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
984 if (win->w_buffer == curbuf) |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
985 foldMoveRange(&win->w_folds, dest + 1, line1 - 1, line2); |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
986 } |
|
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
987 #endif |
| 7 | 988 curbuf->b_op_start.lnum = dest + 1; |
| 989 curbuf->b_op_end.lnum = dest + num_lines; | |
| 990 } | |
| 991 curbuf->b_op_start.col = curbuf->b_op_end.col = 0; | |
|
11140
6b26e044b6f5
patch 8.0.0457: using :move messes up manual folds
Christian Brabandt <cb@256bit.org>
parents:
11129
diff
changeset
|
992 mark_adjust_nofold(last_line - num_lines + 1, last_line, |
| 7 | 993 -(last_line - dest - extra), 0L); |
| 994 | |
| 995 /* | |
| 996 * Now we delete the original text -- webb | |
| 997 */ | |
| 998 if (u_save(line1 + extra - 1, line2 + extra + 1) == FAIL) | |
| 999 return FAIL; | |
| 1000 | |
| 1001 for (l = line1; l <= line2; l++) | |
| 1002 ml_delete(line1 + extra, TRUE); | |
| 1003 | |
| 1004 if (!global_busy && num_lines > p_report) | |
|
14585
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
1005 smsg((char_u *)NGETTEXT("%ld line moved", "%ld lines moved", num_lines), |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
1006 (long)num_lines); |
| 7 | 1007 |
| 1008 /* | |
| 1009 * Leave the cursor on the last of the moved lines. | |
| 1010 */ | |
| 1011 if (dest >= line1) | |
| 1012 curwin->w_cursor.lnum = dest; | |
| 1013 else | |
| 1014 curwin->w_cursor.lnum = dest + (line2 - line1) + 1; | |
| 1015 | |
| 1016 if (line1 < dest) | |
| 3184 | 1017 { |
| 1018 dest += num_lines + 1; | |
| 1019 last_line = curbuf->b_ml.ml_line_count; | |
| 1020 if (dest > last_line + 1) | |
| 1021 dest = last_line + 1; | |
| 1022 changed_lines(line1, 0, dest, 0L); | |
| 1023 } | |
| 7 | 1024 else |
| 1025 changed_lines(dest + 1, 0, line1 + num_lines, 0L); | |
| 1026 | |
| 1027 return OK; | |
| 1028 } | |
| 1029 | |
| 1030 /* | |
| 1031 * ":copy" | |
| 1032 */ | |
| 1033 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1034 ex_copy(linenr_T line1, linenr_T line2, linenr_T n) |
| 7 | 1035 { |
| 1036 linenr_T count; | |
| 1037 char_u *p; | |
| 1038 | |
| 1039 count = line2 - line1 + 1; | |
| 1040 curbuf->b_op_start.lnum = n + 1; | |
| 1041 curbuf->b_op_end.lnum = n + count; | |
| 1042 curbuf->b_op_start.col = curbuf->b_op_end.col = 0; | |
| 1043 | |
| 1044 /* | |
| 1045 * there are three situations: | |
| 1046 * 1. destination is above line1 | |
| 1047 * 2. destination is between line1 and line2 | |
| 1048 * 3. destination is below line2 | |
| 1049 * | |
| 1050 * n = destination (when starting) | |
| 1051 * curwin->w_cursor.lnum = destination (while copying) | |
| 1052 * line1 = start of source (while copying) | |
| 1053 * line2 = end of source (while copying) | |
| 1054 */ | |
| 1055 if (u_save(n, n + 1) == FAIL) | |
| 1056 return; | |
| 1057 | |
| 1058 curwin->w_cursor.lnum = n; | |
| 1059 while (line1 <= line2) | |
| 1060 { | |
| 1061 /* need to use vim_strsave() because the line will be unlocked within | |
| 1062 * ml_append() */ | |
| 1063 p = vim_strsave(ml_get(line1)); | |
| 1064 if (p != NULL) | |
| 1065 { | |
| 1066 ml_append(curwin->w_cursor.lnum, p, (colnr_T)0, FALSE); | |
| 1067 vim_free(p); | |
| 1068 } | |
| 1069 /* situation 2: skip already copied lines */ | |
| 1070 if (line1 == n) | |
| 1071 line1 = curwin->w_cursor.lnum; | |
| 1072 ++line1; | |
| 1073 if (curwin->w_cursor.lnum < line1) | |
| 1074 ++line1; | |
| 1075 if (curwin->w_cursor.lnum < line2) | |
| 1076 ++line2; | |
| 1077 ++curwin->w_cursor.lnum; | |
| 1078 } | |
| 1079 | |
| 1080 appended_lines_mark(n, count); | |
| 1081 | |
| 1082 msgmore((long)count); | |
| 1083 } | |
| 1084 | |
| 359 | 1085 static char_u *prevcmd = NULL; /* the previous command */ |
| 1086 | |
| 1087 #if defined(EXITFREE) || defined(PROTO) | |
| 1088 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1089 free_prev_shellcmd(void) |
| 359 | 1090 { |
| 1091 vim_free(prevcmd); | |
| 1092 } | |
| 1093 #endif | |
| 1094 | |
| 7 | 1095 /* |
| 1096 * Handle the ":!cmd" command. Also for ":r !cmd" and ":w !cmd" | |
| 1097 * Bangs in the argument are replaced with the previously entered command. | |
| 1098 * Remember the argument. | |
| 1099 */ | |
| 1100 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1101 do_bang( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1102 int addr_count, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1103 exarg_T *eap, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1104 int forceit, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1105 int do_in, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1106 int do_out) |
| 7 | 1107 { |
| 1108 char_u *arg = eap->arg; /* command */ | |
| 1109 linenr_T line1 = eap->line1; /* start of range */ | |
| 1110 linenr_T line2 = eap->line2; /* end of range */ | |
| 1111 char_u *newcmd = NULL; /* the new command */ | |
| 1112 int free_newcmd = FALSE; /* need to free() newcmd */ | |
| 1113 int ins_prevcmd; | |
| 1114 char_u *t; | |
| 1115 char_u *p; | |
| 1116 char_u *trailarg; | |
| 1117 int len; | |
| 1118 int scroll_save = msg_scroll; | |
| 1119 | |
| 1120 /* | |
| 1121 * Disallow shell commands for "rvim". | |
| 1122 * Disallow shell commands from .exrc and .vimrc in current directory for | |
| 1123 * security reasons. | |
| 1124 */ | |
| 1125 if (check_restricted() || check_secure()) | |
| 1126 return; | |
| 1127 | |
| 1128 if (addr_count == 0) /* :! */ | |
| 1129 { | |
| 1130 msg_scroll = FALSE; /* don't scroll here */ | |
| 1131 autowrite_all(); | |
| 1132 msg_scroll = scroll_save; | |
| 1133 } | |
| 1134 | |
| 1135 /* | |
| 1136 * Try to find an embedded bang, like in :!<cmd> ! [args] | |
| 1137 * (:!! is indicated by the 'forceit' variable) | |
| 1138 */ | |
| 1139 ins_prevcmd = forceit; | |
| 1140 trailarg = arg; | |
| 1141 do | |
| 1142 { | |
| 1143 len = (int)STRLEN(trailarg) + 1; | |
| 1144 if (newcmd != NULL) | |
| 1145 len += (int)STRLEN(newcmd); | |
| 1146 if (ins_prevcmd) | |
| 1147 { | |
| 1148 if (prevcmd == NULL) | |
| 1149 { | |
| 1150 EMSG(_(e_noprev)); | |
| 1151 vim_free(newcmd); | |
| 1152 return; | |
| 1153 } | |
| 1154 len += (int)STRLEN(prevcmd); | |
| 1155 } | |
| 1872 | 1156 if ((t = alloc((unsigned)len)) == NULL) |
| 7 | 1157 { |
| 1158 vim_free(newcmd); | |
| 1159 return; | |
| 1160 } | |
| 1161 *t = NUL; | |
| 1162 if (newcmd != NULL) | |
| 1163 STRCAT(t, newcmd); | |
| 1164 if (ins_prevcmd) | |
| 1165 STRCAT(t, prevcmd); | |
| 1166 p = t + STRLEN(t); | |
| 1167 STRCAT(t, trailarg); | |
| 1168 vim_free(newcmd); | |
| 1169 newcmd = t; | |
| 1170 | |
| 1171 /* | |
| 1172 * Scan the rest of the argument for '!', which is replaced by the | |
| 1173 * previous command. "\!" is replaced by "!" (this is vi compatible). | |
| 1174 */ | |
| 1175 trailarg = NULL; | |
| 1176 while (*p) | |
| 1177 { | |
| 2823 | 1178 if (*p == '!') |
| 7 | 1179 { |
| 1180 if (p > newcmd && p[-1] == '\\') | |
| 1624 | 1181 STRMOVE(p - 1, p); |
| 7 | 1182 else |
| 1183 { | |
| 1184 trailarg = p; | |
| 1185 *trailarg++ = NUL; | |
| 1186 ins_prevcmd = TRUE; | |
| 1187 break; | |
| 1188 } | |
| 1189 } | |
| 1190 ++p; | |
| 1191 } | |
| 1192 } while (trailarg != NULL); | |
| 1193 | |
| 1194 vim_free(prevcmd); | |
| 1195 prevcmd = newcmd; | |
| 1196 | |
| 1197 if (bangredo) /* put cmd in redo buffer for ! command */ | |
| 1198 { | |
| 5728 | 1199 /* If % or # appears in the command, it must have been escaped. |
| 1200 * Reescape them, so that redoing them does not substitute them by the | |
| 1201 * buffername. */ | |
| 1202 char_u *cmd = vim_strsave_escaped(prevcmd, (char_u *)"%#"); | |
| 1203 | |
| 1204 if (cmd != NULL) | |
| 1205 { | |
| 1206 AppendToRedobuffLit(cmd, -1); | |
| 1207 vim_free(cmd); | |
| 1208 } | |
| 1209 else | |
| 1210 AppendToRedobuffLit(prevcmd, -1); | |
| 7 | 1211 AppendToRedobuff((char_u *)"\n"); |
| 1212 bangredo = FALSE; | |
| 1213 } | |
| 1214 /* | |
| 1215 * Add quotes around the command, for shells that need them. | |
| 1216 */ | |
| 1217 if (*p_shq != NUL) | |
| 1218 { | |
| 1219 newcmd = alloc((unsigned)(STRLEN(prevcmd) + 2 * STRLEN(p_shq) + 1)); | |
| 1220 if (newcmd == NULL) | |
| 1221 return; | |
| 1222 STRCPY(newcmd, p_shq); | |
| 1223 STRCAT(newcmd, prevcmd); | |
| 1224 STRCAT(newcmd, p_shq); | |
| 1225 free_newcmd = TRUE; | |
| 1226 } | |
| 1227 if (addr_count == 0) /* :! */ | |
| 1228 { | |
| 1229 /* echo the command */ | |
| 1230 msg_start(); | |
| 1231 msg_putchar(':'); | |
| 1232 msg_putchar('!'); | |
| 1233 msg_outtrans(newcmd); | |
| 1234 msg_clr_eos(); | |
| 1235 windgoto(msg_row, msg_col); | |
| 1236 | |
| 1237 do_shell(newcmd, 0); | |
| 1238 } | |
| 1239 else /* :range! */ | |
| 725 | 1240 { |
| 7 | 1241 /* Careful: This may recursively call do_bang() again! (because of |
| 1242 * autocommands) */ | |
| 1243 do_filter(line1, line2, eap, newcmd, do_in, do_out); | |
| 725 | 1244 apply_autocmds(EVENT_SHELLFILTERPOST, NULL, NULL, FALSE, curbuf); |
| 1245 } | |
| 7 | 1246 if (free_newcmd) |
| 1247 vim_free(newcmd); | |
| 1248 } | |
| 1249 | |
| 1250 /* | |
| 1251 * do_filter: filter lines through a command given by the user | |
| 1252 * | |
| 169 | 1253 * We mostly use temp files and the call_shell() routine here. This would |
| 1254 * normally be done using pipes on a UNIX machine, but this is more portable | |
| 1255 * to non-unix machines. The call_shell() routine needs to be able | |
| 7 | 1256 * to deal with redirection somehow, and should handle things like looking |
| 1257 * at the PATH env. variable, and adding reasonable extensions to the | |
| 1258 * command name given by the user. All reasonable versions of call_shell() | |
| 1259 * do this. | |
| 169 | 1260 * Alternatively, if on Unix and redirecting input or output, but not both, |
| 1261 * and the 'shelltemp' option isn't set, use pipes. | |
| 7 | 1262 * We use input redirection if do_in is TRUE. |
| 1263 * We use output redirection if do_out is TRUE. | |
| 1264 */ | |
| 1265 static void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1266 do_filter( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1267 linenr_T line1, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1268 linenr_T line2, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1269 exarg_T *eap, /* for forced 'ff' and 'fenc' */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1270 char_u *cmd, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1271 int do_in, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1272 int do_out) |
| 7 | 1273 { |
| 1274 char_u *itmp = NULL; | |
| 1275 char_u *otmp = NULL; | |
| 1276 linenr_T linecount; | |
| 1277 linenr_T read_linecount; | |
| 1278 pos_T cursor_save; | |
| 1279 char_u *cmd_buf; | |
| 1280 buf_T *old_curbuf = curbuf; | |
| 169 | 1281 int shell_flags = 0; |
| 7 | 1282 |
| 1283 if (*cmd == NUL) /* no filter command */ | |
| 1284 return; | |
| 1285 | |
| 1286 cursor_save = curwin->w_cursor; | |
| 1287 linecount = line2 - line1 + 1; | |
| 1288 curwin->w_cursor.lnum = line1; | |
| 1289 curwin->w_cursor.col = 0; | |
| 1290 changed_line_abv_curs(); | |
| 1291 invalidate_botline(); | |
| 1292 | |
| 1293 /* | |
| 169 | 1294 * When using temp files: |
| 1295 * 1. * Form temp file names | |
| 1296 * 2. * Write the lines to a temp file | |
| 1297 * 3. Run the filter command on the temp file | |
| 1298 * 4. * Read the output of the command into the buffer | |
| 1299 * 5. * Delete the original lines to be filtered | |
| 1300 * 6. * Remove the temp files | |
| 1301 * | |
| 1302 * When writing the input with a pipe or when catching the output with a | |
| 1303 * pipe only need to do 3. | |
| 7 | 1304 */ |
| 1305 | |
| 169 | 1306 if (do_out) |
| 1307 shell_flags |= SHELL_DOOUT; | |
| 1308 | |
| 3482 | 1309 #ifdef FEAT_FILTERPIPE |
| 169 | 1310 if (!do_in && do_out && !p_stmp) |
| 1311 { | |
| 1312 /* Use a pipe to fetch stdout of the command, do not use a temp file. */ | |
| 1313 shell_flags |= SHELL_READ; | |
| 1314 curwin->w_cursor.lnum = line2; | |
| 1315 } | |
| 1316 else if (do_in && !do_out && !p_stmp) | |
| 7 | 1317 { |
| 169 | 1318 /* Use a pipe to write stdin of the command, do not use a temp file. */ |
| 1319 shell_flags |= SHELL_WRITE; | |
| 1320 curbuf->b_op_start.lnum = line1; | |
| 1321 curbuf->b_op_end.lnum = line2; | |
| 7 | 1322 } |
| 169 | 1323 else if (do_in && do_out && !p_stmp) |
| 1324 { | |
| 1325 /* Use a pipe to write stdin and fetch stdout of the command, do not | |
| 1326 * use a temp file. */ | |
| 1327 shell_flags |= SHELL_READ|SHELL_WRITE; | |
| 1328 curbuf->b_op_start.lnum = line1; | |
| 1329 curbuf->b_op_end.lnum = line2; | |
| 1330 curwin->w_cursor.lnum = line2; | |
| 1331 } | |
| 1332 else | |
| 1333 #endif | |
| 6721 | 1334 if ((do_in && (itmp = vim_tempname('i', FALSE)) == NULL) |
| 1335 || (do_out && (otmp = vim_tempname('o', FALSE)) == NULL)) | |
| 169 | 1336 { |
| 1337 EMSG(_(e_notmp)); | |
| 1338 goto filterend; | |
| 1339 } | |
| 7 | 1340 |
| 1341 /* | |
| 1342 * The writing and reading of temp files will not be shown. | |
| 1343 * Vi also doesn't do this and the messages are not very informative. | |
| 1344 */ | |
| 1345 ++no_wait_return; /* don't call wait_return() while busy */ | |
| 169 | 1346 if (itmp != NULL && buf_write(curbuf, itmp, NULL, line1, line2, eap, |
| 7 | 1347 FALSE, FALSE, FALSE, TRUE) == FAIL) |
| 1348 { | |
| 1349 msg_putchar('\n'); /* keep message from buf_write() */ | |
| 1350 --no_wait_return; | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
1351 #if defined(FEAT_EVAL) |
| 7 | 1352 if (!aborting()) |
| 1353 #endif | |
| 1354 (void)EMSG2(_(e_notcreate), itmp); /* will call wait_return */ | |
| 1355 goto filterend; | |
| 1356 } | |
| 1357 if (curbuf != old_curbuf) | |
| 1358 goto filterend; | |
| 1359 | |
| 1360 if (!do_out) | |
| 1361 msg_putchar('\n'); | |
| 1362 | |
| 1581 | 1363 /* Create the shell command in allocated memory. */ |
| 7 | 1364 cmd_buf = make_filter_cmd(cmd, itmp, otmp); |
| 1365 if (cmd_buf == NULL) | |
| 1366 goto filterend; | |
| 1367 | |
| 1368 windgoto((int)Rows - 1, 0); | |
| 1369 cursor_on(); | |
| 1370 | |
| 1371 /* | |
| 1372 * When not redirecting the output the command can write anything to the | |
| 1373 * screen. If 'shellredir' is equal to ">", screen may be messed up by | |
| 1374 * stderr output of external command. Clear the screen later. | |
| 1375 * If do_in is FALSE, this could be something like ":r !cat", which may | |
| 1376 * also mess up the screen, clear it later. | |
| 1377 */ | |
| 1378 if (!do_out || STRCMP(p_srr, ">") == 0 || !do_in) | |
| 1379 redraw_later_clear(); | |
| 1380 | |
| 169 | 1381 if (do_out) |
| 1382 { | |
| 1383 if (u_save((linenr_T)(line2), (linenr_T)(line2 + 1)) == FAIL) | |
| 1581 | 1384 { |
| 1385 vim_free(cmd_buf); | |
| 169 | 1386 goto error; |
| 1581 | 1387 } |
| 169 | 1388 redraw_curbuf_later(VALID); |
| 1389 } | |
| 1390 read_linecount = curbuf->b_ml.ml_line_count; | |
| 1391 | |
| 7 | 1392 /* |
| 1393 * When call_shell() fails wait_return() is called to give the user a | |
| 1394 * chance to read the error messages. Otherwise errors are ignored, so you | |
| 1395 * can see the error messages from the command that appear on stdout; use | |
| 1396 * 'u' to fix the text | |
| 1397 * Switch to cooked mode when not redirecting stdin, avoids that something | |
| 1398 * like ":r !cat" hangs. | |
| 1399 * Pass on the SHELL_DOOUT flag when the output is being redirected. | |
| 1400 */ | |
| 169 | 1401 if (call_shell(cmd_buf, SHELL_FILTER | SHELL_COOKED | shell_flags)) |
| 7 | 1402 { |
| 1403 redraw_later_clear(); | |
| 1404 wait_return(FALSE); | |
| 1405 } | |
| 1406 vim_free(cmd_buf); | |
| 1407 | |
| 1408 did_check_timestamps = FALSE; | |
| 1409 need_check_timestamps = TRUE; | |
| 1410 | |
| 1411 /* When interrupting the shell command, it may still have produced some | |
| 1412 * useful output. Reset got_int here, so that readfile() won't cancel | |
| 1413 * reading. */ | |
| 1414 ui_breakcheck(); | |
| 1415 got_int = FALSE; | |
| 1416 | |
| 1417 if (do_out) | |
| 1418 { | |
| 169 | 1419 if (otmp != NULL) |
| 7 | 1420 { |
| 169 | 1421 if (readfile(otmp, NULL, line2, (linenr_T)0, (linenr_T)MAXLNUM, |
|
10575
01a5f64a7a20
patch 8.0.0177: BufEnter autocommand not fired for a directory
Christian Brabandt <cb@256bit.org>
parents:
10482
diff
changeset
|
1422 eap, READ_FILTER) != OK) |
| 169 | 1423 { |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
1424 #if defined(FEAT_EVAL) |
| 169 | 1425 if (!aborting()) |
| 1426 #endif | |
| 1427 { | |
| 1428 msg_putchar('\n'); | |
| 1429 EMSG2(_(e_notread), otmp); | |
| 1430 } | |
| 1431 goto error; | |
| 7 | 1432 } |
| 169 | 1433 if (curbuf != old_curbuf) |
| 1434 goto filterend; | |
| 7 | 1435 } |
| 169 | 1436 |
| 1437 read_linecount = curbuf->b_ml.ml_line_count - read_linecount; | |
| 1438 | |
| 1439 if (shell_flags & SHELL_READ) | |
| 1440 { | |
| 1441 curbuf->b_op_start.lnum = line2 + 1; | |
| 1442 curbuf->b_op_end.lnum = curwin->w_cursor.lnum; | |
| 1443 appended_lines_mark(line2, read_linecount); | |
| 1444 } | |
| 7 | 1445 |
| 1446 if (do_in) | |
| 1447 { | |
| 1448 if (cmdmod.keepmarks || vim_strchr(p_cpo, CPO_REMMARK) == NULL) | |
| 1449 { | |
| 1450 if (read_linecount >= linecount) | |
| 1451 /* move all marks from old lines to new lines */ | |
| 1452 mark_adjust(line1, line2, linecount, 0L); | |
| 1453 else | |
| 1454 { | |
| 1455 /* move marks from old lines to new lines, delete marks | |
| 1456 * that are in deleted lines */ | |
| 1457 mark_adjust(line1, line1 + read_linecount - 1, | |
| 1458 linecount, 0L); | |
| 1459 mark_adjust(line1 + read_linecount, line2, MAXLNUM, 0L); | |
| 1460 } | |
| 1461 } | |
| 1462 | |
| 1463 /* | |
| 1464 * Put cursor on first filtered line for ":range!cmd". | |
| 1465 * Adjust '[ and '] (set by buf_write()). | |
| 1466 */ | |
| 1467 curwin->w_cursor.lnum = line1; | |
| 1468 del_lines(linecount, TRUE); | |
| 1469 curbuf->b_op_start.lnum -= linecount; /* adjust '[ */ | |
| 1470 curbuf->b_op_end.lnum -= linecount; /* adjust '] */ | |
| 1471 write_lnum_adjust(-linecount); /* adjust last line | |
| 1472 for next write */ | |
| 100 | 1473 #ifdef FEAT_FOLDING |
| 1474 foldUpdate(curwin, curbuf->b_op_start.lnum, curbuf->b_op_end.lnum); | |
| 1475 #endif | |
| 7 | 1476 } |
| 1477 else | |
| 1478 { | |
| 1479 /* | |
| 1480 * Put cursor on last new line for ":r !cmd". | |
| 1481 */ | |
| 169 | 1482 linecount = curbuf->b_op_end.lnum - curbuf->b_op_start.lnum + 1; |
| 7 | 1483 curwin->w_cursor.lnum = curbuf->b_op_end.lnum; |
| 1484 } | |
| 100 | 1485 |
| 7 | 1486 beginline(BL_WHITE | BL_FIX); /* cursor on first non-blank */ |
| 1487 --no_wait_return; | |
| 1488 | |
| 1489 if (linecount > p_report) | |
| 1490 { | |
| 1491 if (do_in) | |
| 1492 { | |
| 274 | 1493 vim_snprintf((char *)msg_buf, sizeof(msg_buf), |
| 1494 _("%ld lines filtered"), (long)linecount); | |
| 7 | 1495 if (msg(msg_buf) && !msg_scroll) |
| 1496 /* save message to display it after redraw */ | |
| 680 | 1497 set_keep_msg(msg_buf, 0); |
| 7 | 1498 } |
| 1499 else | |
| 1500 msgmore((long)linecount); | |
| 1501 } | |
| 1502 } | |
| 1503 else | |
| 1504 { | |
| 1505 error: | |
| 1506 /* put cursor back in same position for ":w !cmd" */ | |
| 1507 curwin->w_cursor = cursor_save; | |
| 1508 --no_wait_return; | |
| 1509 wait_return(FALSE); | |
| 1510 } | |
| 1511 | |
| 1512 filterend: | |
| 1513 | |
| 1514 if (curbuf != old_curbuf) | |
| 1515 { | |
| 1516 --no_wait_return; | |
| 1517 EMSG(_("E135: *Filter* Autocommands must not change current buffer")); | |
| 1518 } | |
| 1519 if (itmp != NULL) | |
| 1520 mch_remove(itmp); | |
| 1521 if (otmp != NULL) | |
| 1522 mch_remove(otmp); | |
| 1523 vim_free(itmp); | |
| 1524 vim_free(otmp); | |
| 1525 } | |
| 1526 | |
| 1527 /* | |
| 1528 * Call a shell to execute a command. | |
| 1529 * When "cmd" is NULL start an interactive shell. | |
| 1530 */ | |
| 1531 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1532 do_shell( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1533 char_u *cmd, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1534 int flags) /* may be SHELL_DOOUT when output is redirected */ |
| 7 | 1535 { |
| 1536 buf_T *buf; | |
| 1537 #ifndef FEAT_GUI_MSWIN | |
| 1538 int save_nwr; | |
| 1539 #endif | |
| 1540 #ifdef MSWIN | |
| 1541 int winstart = FALSE; | |
| 1542 #endif | |
| 1543 | |
| 1544 /* | |
| 1545 * Disallow shell commands for "rvim". | |
| 1546 * Disallow shell commands from .exrc and .vimrc in current directory for | |
| 1547 * security reasons. | |
| 1548 */ | |
| 1549 if (check_restricted() || check_secure()) | |
| 1550 { | |
| 1551 msg_end(); | |
| 1552 return; | |
| 1553 } | |
| 1554 | |
| 1555 #ifdef MSWIN | |
| 1556 /* | |
| 1557 * Check if ":!start" is used. | |
| 1558 */ | |
| 1559 if (cmd != NULL) | |
| 1560 winstart = (STRNICMP(cmd, "start ", 6) == 0); | |
| 1561 #endif | |
| 1562 | |
| 1563 /* | |
| 1564 * For autocommands we want to get the output on the current screen, to | |
| 1565 * avoid having to type return below. | |
| 1566 */ | |
| 1567 msg_putchar('\r'); /* put cursor at start of line */ | |
| 1568 if (!autocmd_busy) | |
| 1569 { | |
| 1570 #ifdef MSWIN | |
| 1571 if (!winstart) | |
| 1572 #endif | |
| 1573 stoptermcap(); | |
| 1574 } | |
| 1575 #ifdef MSWIN | |
| 1576 if (!winstart) | |
| 1577 #endif | |
| 1578 msg_putchar('\n'); /* may shift screen one line up */ | |
| 1579 | |
| 1580 /* warning message before calling the shell */ | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
1581 if (p_warn && !autocmd_busy && msg_silent == 0) |
|
9649
fd9727ae3c49
commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
1582 FOR_ALL_BUFFERS(buf) |
|
13012
8d5b451d7bab
patch 8.0.1382: get "no write since last change" message if terminal is open
Christian Brabandt <cb@256bit.org>
parents:
12942
diff
changeset
|
1583 if (bufIsChangedNotTerm(buf)) |
| 7 | 1584 { |
| 1585 #ifdef FEAT_GUI_MSWIN | |
| 1586 if (!winstart) | |
| 1587 starttermcap(); /* don't want a message box here */ | |
| 1588 #endif | |
| 1589 MSG_PUTS(_("[No write since last change]\n")); | |
| 1590 #ifdef FEAT_GUI_MSWIN | |
| 1591 if (!winstart) | |
| 1592 stoptermcap(); | |
| 1593 #endif | |
| 1594 break; | |
| 1595 } | |
| 1596 | |
| 1597 /* This windgoto is required for when the '\n' resulted in a "delete line | |
| 1598 * 1" command to the terminal. */ | |
| 1599 if (!swapping_screen()) | |
| 1600 windgoto(msg_row, msg_col); | |
| 1601 cursor_on(); | |
| 1602 (void)call_shell(cmd, SHELL_COOKED | flags); | |
| 1603 did_check_timestamps = FALSE; | |
| 1604 need_check_timestamps = TRUE; | |
| 1605 | |
| 1606 /* | |
| 1607 * put the message cursor at the end of the screen, avoids wait_return() | |
| 1608 * to overwrite the text that the external command showed | |
| 1609 */ | |
| 1610 if (!swapping_screen()) | |
| 1611 { | |
| 1612 msg_row = Rows - 1; | |
| 1613 msg_col = 0; | |
| 1614 } | |
| 1615 | |
| 1616 if (autocmd_busy) | |
| 1617 { | |
| 1618 if (msg_silent == 0) | |
| 1619 redraw_later_clear(); | |
| 1620 } | |
| 1621 else | |
| 1622 { | |
| 1623 /* | |
| 1624 * For ":sh" there is no need to call wait_return(), just redraw. | |
| 1625 * Also for the Win32 GUI (the output is in a console window). | |
| 1626 * Otherwise there is probably text on the screen that the user wants | |
| 1627 * to read before redrawing, so call wait_return(). | |
| 1628 */ | |
| 1629 #ifndef FEAT_GUI_MSWIN | |
| 1630 if (cmd == NULL | |
| 1631 # ifdef WIN3264 | |
| 1632 || (winstart && !need_wait_return) | |
| 1633 # endif | |
| 1634 ) | |
| 1635 { | |
| 1636 if (msg_silent == 0) | |
| 1637 redraw_later_clear(); | |
| 1638 need_wait_return = FALSE; | |
| 1639 } | |
| 1640 else | |
| 1641 { | |
| 1642 /* | |
| 1643 * If we switch screens when starttermcap() is called, we really | |
| 1644 * want to wait for "hit return to continue". | |
| 1645 */ | |
| 1646 save_nwr = no_wait_return; | |
| 1647 if (swapping_screen()) | |
| 1648 no_wait_return = FALSE; | |
| 1649 # ifdef AMIGA | |
| 1650 wait_return(term_console ? -1 : msg_silent == 0); /* see below */ | |
| 1651 # else | |
| 1652 wait_return(msg_silent == 0); | |
| 1653 # endif | |
| 1654 no_wait_return = save_nwr; | |
| 1655 } | |
| 1656 #endif /* FEAT_GUI_W32 */ | |
| 1657 | |
| 1658 #ifdef MSWIN | |
| 1659 if (!winstart) /* if winstart==TRUE, never stopped termcap! */ | |
| 1660 #endif | |
| 1661 starttermcap(); /* start termcap if not done by wait_return() */ | |
| 1662 | |
| 1663 /* | |
| 1664 * In an Amiga window redrawing is caused by asking the window size. | |
| 1665 * If we got an interrupt this will not work. The chance that the | |
| 1666 * window size is wrong is very small, but we need to redraw the | |
| 1667 * screen. Don't do this if ':' hit in wait_return(). THIS IS UGLY | |
| 1668 * but it saves an extra redraw. | |
| 1669 */ | |
| 1670 #ifdef AMIGA | |
| 1671 if (skip_redraw) /* ':' hit in wait_return() */ | |
| 1672 { | |
| 1673 if (msg_silent == 0) | |
| 1674 redraw_later_clear(); | |
| 1675 } | |
| 1676 else if (term_console) | |
| 1677 { | |
| 1678 OUT_STR(IF_EB("\033[0 q", ESC_STR "[0 q")); /* get window size */ | |
| 1679 if (got_int && msg_silent == 0) | |
| 1680 redraw_later_clear(); /* if got_int is TRUE, redraw needed */ | |
| 1681 else | |
| 1682 must_redraw = 0; /* no extra redraw needed */ | |
| 1683 } | |
| 1684 #endif | |
| 1685 } | |
| 1686 | |
| 1687 /* display any error messages now */ | |
| 1688 display_errors(); | |
| 725 | 1689 |
| 1690 apply_autocmds(EVENT_SHELLCMDPOST, NULL, NULL, FALSE, curbuf); | |
| 7 | 1691 } |
| 1692 | |
|
14913
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1693 #if !defined(UNIX) |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1694 static char_u * |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1695 find_pipe(char_u *cmd) |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1696 { |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1697 char_u *p; |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1698 int inquote = FALSE; |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1699 |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1700 for (p = cmd; *p != NUL; ++p) |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1701 { |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1702 if (!inquote && *p == '|') |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1703 return p; |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1704 if (*p == '"') |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1705 inquote = !inquote; |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1706 else if (rem_backslash(p)) |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1707 ++p; |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1708 } |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1709 return NULL; |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1710 } |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1711 #endif |
|
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1712 |
| 7 | 1713 /* |
| 1714 * Create a shell command from a command string, input redirection file and | |
| 1715 * output redirection file. | |
| 1716 * Returns an allocated string with the shell command, or NULL for failure. | |
| 1717 */ | |
| 1718 char_u * | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1719 make_filter_cmd( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1720 char_u *cmd, /* command */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1721 char_u *itmp, /* NULL or name of input file */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1722 char_u *otmp) /* NULL or name of output file */ |
| 7 | 1723 { |
| 1724 char_u *buf; | |
| 1725 long_u len; | |
| 5867 | 1726 |
|
7410
08e62c4fc17d
commit https://github.com/vim/vim/commit/53076830fea6df737455523f7e235bfe4f79864d
Christian Brabandt <cb@256bit.org>
parents:
7408
diff
changeset
|
1727 #if defined(UNIX) |
| 5881 | 1728 int is_fish_shell; |
| 5911 | 1729 char_u *shell_name = get_isolated_shell_name(); |
| 5881 | 1730 |
| 5867 | 1731 /* Account for fish's different syntax for subshells */ |
| 5911 | 1732 is_fish_shell = (fnamecmp(shell_name, "fish") == 0); |
| 1733 vim_free(shell_name); | |
| 5867 | 1734 if (is_fish_shell) |
| 1735 len = (long_u)STRLEN(cmd) + 13; /* "begin; " + "; end" + NUL */ | |
| 1736 else | |
| 1737 #endif | |
| 1738 len = (long_u)STRLEN(cmd) + 3; /* "()" + NUL */ | |
| 7 | 1739 if (itmp != NULL) |
| 1740 len += (long_u)STRLEN(itmp) + 9; /* " { < " + " } " */ | |
| 1741 if (otmp != NULL) | |
| 1742 len += (long_u)STRLEN(otmp) + (long_u)STRLEN(p_srr) + 2; /* " " */ | |
| 1743 buf = lalloc(len, TRUE); | |
| 1744 if (buf == NULL) | |
| 1745 return NULL; | |
| 1746 | |
|
7410
08e62c4fc17d
commit https://github.com/vim/vim/commit/53076830fea6df737455523f7e235bfe4f79864d
Christian Brabandt <cb@256bit.org>
parents:
7408
diff
changeset
|
1747 #if defined(UNIX) |
| 7 | 1748 /* |
| 169 | 1749 * Put braces around the command (for concatenated commands) when |
| 1750 * redirecting input and/or output. | |
| 7 | 1751 */ |
| 169 | 1752 if (itmp != NULL || otmp != NULL) |
| 5867 | 1753 { |
| 1754 if (is_fish_shell) | |
| 1755 vim_snprintf((char *)buf, len, "begin; %s; end", (char *)cmd); | |
| 1756 else | |
| 1757 vim_snprintf((char *)buf, len, "(%s)", (char *)cmd); | |
| 1758 } | |
| 169 | 1759 else |
| 1760 STRCPY(buf, cmd); | |
| 7 | 1761 if (itmp != NULL) |
| 1762 { | |
| 1763 STRCAT(buf, " < "); | |
| 1764 STRCAT(buf, itmp); | |
| 1765 } | |
| 1766 #else | |
| 1767 /* | |
| 5867 | 1768 * For shells that don't understand braces around commands, at least allow |
| 7 | 1769 * the use of commands in a pipe. |
| 1770 */ | |
| 1771 STRCPY(buf, cmd); | |
| 1772 if (itmp != NULL) | |
| 1773 { | |
| 1774 char_u *p; | |
| 1775 | |
| 1776 /* | |
| 1777 * If there is a pipe, we have to put the '<' in front of it. | |
| 1778 * Don't do this when 'shellquote' is not empty, otherwise the | |
| 1779 * redirection would be inside the quotes. | |
| 1780 */ | |
| 1781 if (*p_shq == NUL) | |
| 1782 { | |
|
14913
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1783 p = find_pipe(buf); |
| 7 | 1784 if (p != NULL) |
| 1785 *p = NUL; | |
| 1786 } | |
| 1787 STRCAT(buf, " <"); /* " < " causes problems on Amiga */ | |
| 1788 STRCAT(buf, itmp); | |
| 1789 if (*p_shq == NUL) | |
| 1790 { | |
|
14913
d4777be849d0
patch 8.1.0468: MS-Windows: filter command with pipe character fails
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
1791 p = find_pipe(cmd); |
| 7 | 1792 if (p != NULL) |
| 1793 { | |
| 1794 STRCAT(buf, " "); /* insert a space before the '|' for DOS */ | |
| 1795 STRCAT(buf, p); | |
| 1796 } | |
| 1797 } | |
| 1798 } | |
| 1799 #endif | |
| 1800 if (otmp != NULL) | |
| 1872 | 1801 append_redir(buf, (int)len, p_srr, otmp); |
| 7 | 1802 |
| 1803 return buf; | |
| 1804 } | |
| 1805 | |
| 1806 /* | |
| 1872 | 1807 * Append output redirection for file "fname" to the end of string buffer |
| 1808 * "buf[buflen]" | |
| 7 | 1809 * Works with the 'shellredir' and 'shellpipe' options. |
| 1810 * The caller should make sure that there is enough room: | |
| 1811 * STRLEN(opt) + STRLEN(fname) + 3 | |
| 1812 */ | |
| 1813 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1814 append_redir( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1815 char_u *buf, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1816 int buflen, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1817 char_u *opt, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1818 char_u *fname) |
| 7 | 1819 { |
| 1820 char_u *p; | |
| 1872 | 1821 char_u *end; |
| 1822 | |
| 1823 end = buf + STRLEN(buf); | |
|
5257
e63e4b4be923
updated for version 7.4b.005
Bram Moolenaar <bram@vim.org>
parents:
5242
diff
changeset
|
1824 /* find "%s" */ |
| 7 | 1825 for (p = opt; (p = vim_strchr(p, '%')) != NULL; ++p) |
|
5257
e63e4b4be923
updated for version 7.4b.005
Bram Moolenaar <bram@vim.org>
parents:
5242
diff
changeset
|
1826 { |
|
e63e4b4be923
updated for version 7.4b.005
Bram Moolenaar <bram@vim.org>
parents:
5242
diff
changeset
|
1827 if (p[1] == 's') /* found %s */ |
| 7 | 1828 break; |
|
5257
e63e4b4be923
updated for version 7.4b.005
Bram Moolenaar <bram@vim.org>
parents:
5242
diff
changeset
|
1829 if (p[1] == '%') /* skip %% */ |
|
e63e4b4be923
updated for version 7.4b.005
Bram Moolenaar <bram@vim.org>
parents:
5242
diff
changeset
|
1830 ++p; |
|
e63e4b4be923
updated for version 7.4b.005
Bram Moolenaar <bram@vim.org>
parents:
5242
diff
changeset
|
1831 } |
| 7 | 1832 if (p != NULL) |
| 1833 { | |
| 1872 | 1834 *end = ' '; /* not really needed? Not with sh, ksh or bash */ |
| 1835 vim_snprintf((char *)end + 1, (size_t)(buflen - (end + 1 - buf)), | |
| 1836 (char *)opt, (char *)fname); | |
| 7 | 1837 } |
| 1838 else | |
| 1872 | 1839 vim_snprintf((char *)end, (size_t)(buflen - (end - buf)), |
| 7 | 1840 #ifdef FEAT_QUICKFIX |
| 1841 " %s %s", | |
| 1842 #else | |
| 1843 " %s%s", /* " > %s" causes problems on Amiga */ | |
| 1844 #endif | |
| 1845 (char *)opt, (char *)fname); | |
| 1846 } | |
| 1847 | |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
1848 #if defined(FEAT_VIMINFO) || defined(PROTO) |
| 7 | 1849 |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
1850 static int read_viminfo_barline(vir_T *virp, int got_encoding, int force, int writing); |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
1851 static void write_viminfo_version(FILE *fp_out); |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
1852 static void write_viminfo_barlines(vir_T *virp, FILE *fp_out); |
| 7 | 1853 static int viminfo_errcnt; |
| 1854 | |
| 1855 static int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1856 no_viminfo(void) |
| 7 | 1857 { |
| 1858 /* "vim -i NONE" does not read or write a viminfo file */ | |
|
11666
5cd9ba96561d
patch 8.0.0716: not easy to start Vim cleanly
Christian Brabandt <cb@256bit.org>
parents:
11649
diff
changeset
|
1859 return STRCMP(p_viminfofile, "NONE") == 0; |
| 7 | 1860 } |
| 1861 | |
| 1862 /* | |
| 1863 * Report an error for reading a viminfo file. | |
| 1864 * Count the number of errors. When there are more than 10, return TRUE. | |
| 1865 */ | |
| 1866 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1867 viminfo_error(char *errnum, char *message, char_u *line) |
| 7 | 1868 { |
| 274 | 1869 vim_snprintf((char *)IObuff, IOSIZE, _("%sviminfo: %s in line: "), |
| 1870 errnum, message); | |
| 1459 | 1871 STRNCAT(IObuff, line, IOSIZE - STRLEN(IObuff) - 1); |
| 156 | 1872 if (IObuff[STRLEN(IObuff) - 1] == '\n') |
| 1873 IObuff[STRLEN(IObuff) - 1] = NUL; | |
| 7 | 1874 emsg(IObuff); |
| 1875 if (++viminfo_errcnt >= 10) | |
| 1876 { | |
| 1877 EMSG(_("E136: viminfo: Too many errors, skipping rest of file")); | |
| 1878 return TRUE; | |
| 1879 } | |
| 1880 return FALSE; | |
| 1881 } | |
| 1882 | |
| 1883 /* | |
| 1884 * read_viminfo() -- Read the viminfo file. Registers etc. which are already | |
| 1733 | 1885 * set are not over-written unless "flags" includes VIF_FORCEIT. -- webb |
| 7 | 1886 */ |
| 1887 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1888 read_viminfo( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1889 char_u *file, /* file name or NULL to use default name */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1890 int flags) /* VIF_WANT_INFO et al. */ |
| 7 | 1891 { |
| 1892 FILE *fp; | |
| 1893 char_u *fname; | |
| 1894 | |
| 1895 if (no_viminfo()) | |
| 1896 return FAIL; | |
| 1897 | |
| 1733 | 1898 fname = viminfo_filename(file); /* get file name in allocated buffer */ |
| 7 | 1899 if (fname == NULL) |
| 1900 return FAIL; | |
| 1901 fp = mch_fopen((char *)fname, READBIN); | |
| 1902 | |
| 1903 if (p_verbose > 0) | |
| 294 | 1904 { |
| 1905 verbose_enter(); | |
| 274 | 1906 smsg((char_u *)_("Reading viminfo file \"%s\"%s%s%s"), |
| 1907 fname, | |
| 1733 | 1908 (flags & VIF_WANT_INFO) ? _(" info") : "", |
| 1909 (flags & VIF_WANT_MARKS) ? _(" marks") : "", | |
| 1910 (flags & VIF_GET_OLDFILES) ? _(" oldfiles") : "", | |
| 274 | 1911 fp == NULL ? _(" FAILED") : ""); |
| 294 | 1912 verbose_leave(); |
| 1913 } | |
| 7 | 1914 |
| 1915 vim_free(fname); | |
| 1916 if (fp == NULL) | |
| 1917 return FAIL; | |
| 1918 | |
| 1919 viminfo_errcnt = 0; | |
| 1733 | 1920 do_viminfo(fp, NULL, flags); |
| 7 | 1921 |
| 1922 fclose(fp); | |
| 1923 return OK; | |
| 1924 } | |
| 1925 | |
| 1926 /* | |
|
4903
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
1927 * Write the viminfo file. The old one is read in first so that effectively a |
|
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
1928 * merge of current info and old info is done. This allows multiple vims to |
|
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
1929 * run simultaneously, without losing any marks etc. |
|
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
1930 * If "forceit" is TRUE, then the old file is not read in, and only internal |
|
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
1931 * info is written to the file. |
| 7 | 1932 */ |
| 1933 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
1934 write_viminfo(char_u *file, int forceit) |
| 7 | 1935 { |
| 1936 char_u *fname; | |
| 1937 FILE *fp_in = NULL; /* input viminfo file, if any */ | |
| 1938 FILE *fp_out = NULL; /* output viminfo file */ | |
| 1939 char_u *tempname = NULL; /* name of temp viminfo file */ | |
|
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
9377
diff
changeset
|
1940 stat_T st_new; /* mch_stat() of potential new file */ |
| 7 | 1941 #if defined(UNIX) || defined(VMS) |
| 1942 mode_t umask_save; | |
| 1943 #endif | |
| 1944 #ifdef UNIX | |
| 1945 int shortname = FALSE; /* use 8.3 file name */ | |
|
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
9377
diff
changeset
|
1946 stat_T st_old; /* mch_stat() of existing viminfo file */ |
| 7 | 1947 #endif |
| 601 | 1948 #ifdef WIN3264 |
|
7194
272f04b41f51
commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents:
7009
diff
changeset
|
1949 int hidden = FALSE; |
| 601 | 1950 #endif |
| 7 | 1951 |
| 1952 if (no_viminfo()) | |
| 1953 return; | |
| 1954 | |
| 1955 fname = viminfo_filename(file); /* may set to default if NULL */ | |
| 1956 if (fname == NULL) | |
| 1957 return; | |
| 1958 | |
| 1959 fp_in = mch_fopen((char *)fname, READBIN); | |
| 1960 if (fp_in == NULL) | |
| 1961 { | |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1962 int fd; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1963 |
| 7 | 1964 /* if it does exist, but we can't read it, don't try writing */ |
| 1965 if (mch_stat((char *)fname, &st_new) == 0) | |
| 1966 goto end; | |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1967 |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1968 /* Create the new .viminfo non-accessible for others, because it may |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1969 * contain text from non-accessible documents. It is up to the user to |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1970 * widen access (e.g. to a group). This may also fail if there is a |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1971 * race condition, then just give up. */ |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1972 fd = mch_open((char *)fname, |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1973 O_CREAT|O_EXTRA|O_EXCL|O_WRONLY|O_NOFOLLOW, 0600); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1974 if (fd < 0) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1975 goto end; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1976 fp_out = fdopen(fd, WRITEBIN); |
| 7 | 1977 } |
| 1978 else | |
| 1979 { | |
| 1980 /* | |
| 1981 * There is an existing viminfo file. Create a temporary file to | |
| 1982 * write the new viminfo into, in the same directory as the | |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1983 * existing viminfo file, which will be renamed once all writing is |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
1984 * successful. |
| 7 | 1985 */ |
| 1986 #ifdef UNIX | |
| 1987 /* | |
| 1988 * For Unix we check the owner of the file. It's not very nice to | |
| 1989 * overwrite a user's viminfo file after a "su root", with a | |
| 1990 * viminfo file that the user can't read. | |
| 1991 */ | |
| 1869 | 1992 st_old.st_dev = (dev_t)0; |
| 1438 | 1993 st_old.st_ino = 0; |
| 7 | 1994 st_old.st_mode = 0600; |
| 1076 | 1995 if (mch_stat((char *)fname, &st_old) == 0 |
| 1996 && getuid() != ROOT_UID | |
| 560 | 1997 && !(st_old.st_uid == getuid() |
| 7 | 1998 ? (st_old.st_mode & 0200) |
| 1999 : (st_old.st_gid == getgid() | |
| 2000 ? (st_old.st_mode & 0020) | |
| 2001 : (st_old.st_mode & 0002)))) | |
| 2002 { | |
| 944 | 2003 int tt = msg_didany; |
| 7 | 2004 |
| 2005 /* avoid a wait_return for this message, it's annoying */ | |
| 2006 EMSG2(_("E137: Viminfo file is not writable: %s"), fname); | |
| 2007 msg_didany = tt; | |
| 840 | 2008 fclose(fp_in); |
| 7 | 2009 goto end; |
| 2010 } | |
| 2011 #endif | |
| 601 | 2012 #ifdef WIN3264 |
| 2013 /* Get the file attributes of the existing viminfo file. */ | |
|
7194
272f04b41f51
commit https://github.com/vim/vim/commit/8a52ba791893fd55c5bdf98825c5b3e8892eaa62
Christian Brabandt <cb@256bit.org>
parents:
7009
diff
changeset
|
2014 hidden = mch_ishidden(fname); |
| 601 | 2015 #endif |
| 7 | 2016 |
| 2017 /* | |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2018 * Make tempname, find one that does not exist yet. |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2019 * Beware of a race condition: If someone logs out and all Vim |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2020 * instances exit at the same time a temp file might be created between |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2021 * stat() and open(). Use mch_open() with O_EXCL to avoid that. |
| 7 | 2022 * May try twice: Once normal and once with shortname set, just in |
| 2023 * case somebody puts his viminfo file in an 8.3 filesystem. | |
| 2024 */ | |
| 2025 for (;;) | |
| 2026 { | |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2027 int next_char = 'z'; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2028 char_u *wp; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2029 |
| 7 | 2030 tempname = buf_modname( |
| 2031 #ifdef UNIX | |
| 2032 shortname, | |
| 2033 #else | |
| 2034 FALSE, | |
| 2035 #endif | |
| 2036 fname, | |
| 2037 #ifdef VMS | |
| 2038 (char_u *)"-tmp", | |
| 2039 #else | |
| 2040 (char_u *)".tmp", | |
| 2041 #endif | |
| 2042 FALSE); | |
| 2043 if (tempname == NULL) /* out of memory */ | |
| 2044 break; | |
| 2045 | |
| 2046 /* | |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2047 * Try a series of names. Change one character, just before |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2048 * the extension. This should also work for an 8.3 |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2049 * file name, when after adding the extension it still is |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2050 * the same file as the original. |
| 7 | 2051 */ |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2052 wp = tempname + STRLEN(tempname) - 5; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2053 if (wp < gettail(tempname)) /* empty file name? */ |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2054 wp = gettail(tempname); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2055 for (;;) |
| 7 | 2056 { |
| 2057 /* | |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2058 * Check if tempfile already exists. Never overwrite an |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2059 * existing file! |
| 7 | 2060 */ |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2061 if (mch_stat((char *)tempname, &st_new) == 0) |
| 7 | 2062 { |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2063 #ifdef UNIX |
| 7 | 2064 /* |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2065 * Check if tempfile is same as original file. May happen |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2066 * when modname() gave the same file back. E.g. silly |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2067 * link, or file name-length reached. Try again with |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2068 * shortname set. |
| 7 | 2069 */ |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2070 if (!shortname && st_new.st_dev == st_old.st_dev |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2071 && st_new.st_ino == st_old.st_ino) |
| 7 | 2072 { |
|
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13174
diff
changeset
|
2073 VIM_CLEAR(tempname); |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2074 shortname = TRUE; |
| 7 | 2075 break; |
| 2076 } | |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2077 #endif |
| 7 | 2078 } |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2079 else |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2080 { |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2081 /* Try creating the file exclusively. This may fail if |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2082 * another Vim tries to do it at the same time. */ |
| 762 | 2083 #ifdef VMS |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2084 /* fdopen() fails for some reason */ |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2085 umask_save = umask(077); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2086 fp_out = mch_fopen((char *)tempname, WRITEBIN); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2087 (void)umask(umask_save); |
| 762 | 2088 #else |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2089 int fd; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2090 |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2091 /* Use mch_open() to be able to use O_NOFOLLOW and set file |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2092 * protection: |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2093 * Unix: same as original file, but strip s-bit. Reset |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2094 * umask to avoid it getting in the way. |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2095 * Others: r&w for user only. */ |
| 762 | 2096 # ifdef UNIX |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2097 umask_save = umask(0); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2098 fd = mch_open((char *)tempname, |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2099 O_CREAT|O_EXTRA|O_EXCL|O_WRONLY|O_NOFOLLOW, |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2100 (int)((st_old.st_mode & 0777) | 0600)); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2101 (void)umask(umask_save); |
| 762 | 2102 # else |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2103 fd = mch_open((char *)tempname, |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2104 O_CREAT|O_EXTRA|O_EXCL|O_WRONLY|O_NOFOLLOW, 0600); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2105 # endif |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2106 if (fd < 0) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2107 { |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2108 fp_out = NULL; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2109 # ifdef EEXIST |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2110 /* Avoid trying lots of names while the problem is lack |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2111 * of premission, only retry if the file already |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2112 * exists. */ |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2113 if (errno != EEXIST) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2114 break; |
| 762 | 2115 # endif |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2116 } |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2117 else |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2118 fp_out = fdopen(fd, WRITEBIN); |
| 762 | 2119 #endif /* VMS */ |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2120 if (fp_out != NULL) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2121 break; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2122 } |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2123 |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2124 /* Assume file exists, try again with another name. */ |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2125 if (next_char == 'a' - 1) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2126 { |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2127 /* They all exist? Must be something wrong! Don't write |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2128 * the viminfo file then. */ |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2129 EMSG2(_("E929: Too many viminfo temp files, like %s!"), |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2130 tempname); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2131 break; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2132 } |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2133 *wp = next_char; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2134 --next_char; |
| 7 | 2135 } |
| 557 | 2136 |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2137 if (tempname != NULL) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2138 break; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2139 /* continue if shortname was set */ |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2140 } |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2141 |
| 557 | 2142 #if defined(UNIX) && defined(HAVE_FCHOWN) |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2143 if (tempname != NULL && fp_out != NULL) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2144 { |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2145 stat_T tmp_st; |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2146 |
| 7 | 2147 /* |
|
12820
63d87ba12c34
patch 8.0.1287: temp file used for viminfo may have wrong permissions
Christian Brabandt <cb@256bit.org>
parents:
12676
diff
changeset
|
2148 * Make sure the original owner can read/write the tempfile and |
|
63d87ba12c34
patch 8.0.1287: temp file used for viminfo may have wrong permissions
Christian Brabandt <cb@256bit.org>
parents:
12676
diff
changeset
|
2149 * otherwise preserve permissions, making sure the group matches. |
| 7 | 2150 */ |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2151 if (mch_stat((char *)tempname, &tmp_st) >= 0) |
|
12820
63d87ba12c34
patch 8.0.1287: temp file used for viminfo may have wrong permissions
Christian Brabandt <cb@256bit.org>
parents:
12676
diff
changeset
|
2152 { |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2153 if (st_old.st_uid != tmp_st.st_uid) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2154 /* Changing the owner might fail, in which case the |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2155 * file will now owned by the current user, oh well. */ |
|
14730
193471015e1a
patch 8.1.0377: xdiff doesn't use the Vim memory allocation functions
Christian Brabandt <cb@256bit.org>
parents:
14585
diff
changeset
|
2156 vim_ignored = fchown(fileno(fp_out), st_old.st_uid, -1); |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2157 if (st_old.st_gid != tmp_st.st_gid |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2158 && fchown(fileno(fp_out), -1, st_old.st_gid) == -1) |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2159 /* can't set the group to what it should be, remove |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2160 * group permissions */ |
|
12820
63d87ba12c34
patch 8.0.1287: temp file used for viminfo may have wrong permissions
Christian Brabandt <cb@256bit.org>
parents:
12676
diff
changeset
|
2161 (void)mch_setperm(tempname, 0600); |
|
63d87ba12c34
patch 8.0.1287: temp file used for viminfo may have wrong permissions
Christian Brabandt <cb@256bit.org>
parents:
12676
diff
changeset
|
2162 } |
|
12938
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2163 else |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2164 /* can't stat the file, set conservative permissions */ |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2165 (void)mch_setperm(tempname, 0600); |
|
1d41836582b3
patch 8.0.1345: race condition between stat() and open() for viminfo
Christian Brabandt <cb@256bit.org>
parents:
12820
diff
changeset
|
2166 } |
|
12942
914fbd1d269f
patch 8.0.1347: MS-Windows: build broken by misplaced curly
Christian Brabandt <cb@256bit.org>
parents:
12938
diff
changeset
|
2167 #endif |
|
914fbd1d269f
patch 8.0.1347: MS-Windows: build broken by misplaced curly
Christian Brabandt <cb@256bit.org>
parents:
12938
diff
changeset
|
2168 } |
| 7 | 2169 |
| 2170 /* | |
| 2171 * Check if the new viminfo file can be written to. | |
| 2172 */ | |
| 2173 if (fp_out == NULL) | |
| 2174 { | |
| 2175 EMSG2(_("E138: Can't write viminfo file %s!"), | |
| 301 | 2176 (fp_in == NULL || tempname == NULL) ? fname : tempname); |
| 7 | 2177 if (fp_in != NULL) |
| 2178 fclose(fp_in); | |
| 2179 goto end; | |
| 2180 } | |
| 2181 | |
| 2182 if (p_verbose > 0) | |
| 294 | 2183 { |
| 2184 verbose_enter(); | |
| 274 | 2185 smsg((char_u *)_("Writing viminfo file \"%s\""), fname); |
| 294 | 2186 verbose_leave(); |
| 2187 } | |
| 7 | 2188 |
| 2189 viminfo_errcnt = 0; | |
| 1733 | 2190 do_viminfo(fp_in, fp_out, forceit ? 0 : (VIF_WANT_INFO | VIF_WANT_MARKS)); |
| 7 | 2191 |
|
8573
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2192 if (fclose(fp_out) == EOF) |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2193 ++viminfo_errcnt; |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2194 |
| 7 | 2195 if (fp_in != NULL) |
| 2196 { | |
| 2197 fclose(fp_in); | |
| 601 | 2198 |
| 6049 | 2199 /* In case of an error keep the original viminfo file. Otherwise |
| 2200 * rename the newly written file. Give an error if that fails. */ | |
|
8573
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2201 if (viminfo_errcnt == 0) |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2202 { |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2203 if (vim_rename(tempname, fname) == -1) |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2204 { |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2205 ++viminfo_errcnt; |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2206 EMSG2(_("E886: Can't rename viminfo file to %s!"), fname); |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2207 } |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2208 # ifdef WIN3264 |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2209 /* If the viminfo file was hidden then also hide the new file. */ |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2210 else if (hidden) |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2211 mch_hide(fname); |
|
c76cb97073bd
commit https://github.com/vim/vim/commit/927030af23982a70580178e32806cd3638ce6e5b
Christian Brabandt <cb@256bit.org>
parents:
8560
diff
changeset
|
2212 # endif |
| 6049 | 2213 } |
| 2214 if (viminfo_errcnt > 0) | |
| 7 | 2215 mch_remove(tempname); |
| 601 | 2216 } |
| 2217 | |
| 7 | 2218 end: |
| 2219 vim_free(fname); | |
| 2220 vim_free(tempname); | |
| 2221 } | |
| 2222 | |
| 2223 /* | |
| 2224 * Get the viminfo file name to use. | |
| 2225 * If "file" is given and not empty, use it (has already been expanded by | |
| 2226 * cmdline functions). | |
| 2227 * Otherwise use "-i file_name", value from 'viminfo' or the default, and | |
| 2228 * expand environment variables. | |
| 2229 * Returns an allocated string. NULL when out of memory. | |
| 2230 */ | |
| 2231 static char_u * | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2232 viminfo_filename(char_u *file) |
| 7 | 2233 { |
| 2234 if (file == NULL || *file == NUL) | |
| 2235 { | |
|
11666
5cd9ba96561d
patch 8.0.0716: not easy to start Vim cleanly
Christian Brabandt <cb@256bit.org>
parents:
11649
diff
changeset
|
2236 if (*p_viminfofile != NUL) |
|
5cd9ba96561d
patch 8.0.0716: not easy to start Vim cleanly
Christian Brabandt <cb@256bit.org>
parents:
11649
diff
changeset
|
2237 file = p_viminfofile; |
| 7 | 2238 else if ((file = find_viminfo_parameter('n')) == NULL || *file == NUL) |
| 2239 { | |
| 2240 #ifdef VIMINFO_FILE2 | |
| 2241 # ifdef VMS | |
| 2242 if (mch_getenv((char_u *)"SYS$LOGIN") == NULL) | |
| 2243 # else | |
|
12297
98586656fcae
patch 8.0.1028: MS-Windows: viminfo uses $VIM/_viminfo if $HOME not set
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
2244 # ifdef MSWIN |
|
98586656fcae
patch 8.0.1028: MS-Windows: viminfo uses $VIM/_viminfo if $HOME not set
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
2245 /* Use $VIM only if $HOME is the default "C:/". */ |
|
98586656fcae
patch 8.0.1028: MS-Windows: viminfo uses $VIM/_viminfo if $HOME not set
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
2246 if (STRCMP(vim_getenv((char_u *)"HOME", NULL), "C:/") == 0 |
|
98586656fcae
patch 8.0.1028: MS-Windows: viminfo uses $VIM/_viminfo if $HOME not set
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
2247 && mch_getenv((char_u *)"HOME") == NULL) |
|
98586656fcae
patch 8.0.1028: MS-Windows: viminfo uses $VIM/_viminfo if $HOME not set
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
2248 # else |
| 7 | 2249 if (mch_getenv((char_u *)"HOME") == NULL) |
|
12297
98586656fcae
patch 8.0.1028: MS-Windows: viminfo uses $VIM/_viminfo if $HOME not set
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
2250 # endif |
| 7 | 2251 # endif |
| 2252 { | |
| 2253 /* don't use $VIM when not available. */ | |
| 2254 expand_env((char_u *)"$VIM", NameBuff, MAXPATHL); | |
| 2255 if (STRCMP("$VIM", NameBuff) != 0) /* $VIM was expanded */ | |
| 2256 file = (char_u *)VIMINFO_FILE2; | |
| 2257 else | |
| 2258 file = (char_u *)VIMINFO_FILE; | |
| 2259 } | |
| 2260 else | |
| 2261 #endif | |
| 2262 file = (char_u *)VIMINFO_FILE; | |
| 2263 } | |
| 2264 expand_env(file, NameBuff, MAXPATHL); | |
| 2265 file = NameBuff; | |
| 2266 } | |
| 2267 return vim_strsave(file); | |
| 2268 } | |
| 2269 | |
| 2270 /* | |
| 2271 * do_viminfo() -- Should only be called from read_viminfo() & write_viminfo(). | |
| 2272 */ | |
| 2273 static void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2274 do_viminfo(FILE *fp_in, FILE *fp_out, int flags) |
| 7 | 2275 { |
| 2276 int eof = FALSE; | |
| 2277 vir_T vir; | |
|
4903
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
2278 int merge = FALSE; |
|
9414
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2279 int do_copy_marks = FALSE; |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2280 garray_T buflist; |
| 7 | 2281 |
| 2282 if ((vir.vir_line = alloc(LSIZE)) == NULL) | |
| 2283 return; | |
| 2284 vir.vir_fd = fp_in; | |
| 2285 #ifdef FEAT_MBYTE | |
| 2286 vir.vir_conv.vc_type = CONV_NONE; | |
| 2287 #endif | |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2288 ga_init2(&vir.vir_barlines, (int)sizeof(char_u *), 100); |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2289 vir.vir_version = -1; |
| 7 | 2290 |
| 2291 if (fp_in != NULL) | |
| 2292 { | |
| 1733 | 2293 if (flags & VIF_WANT_INFO) |
|
4903
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
2294 { |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2295 if (fp_out != NULL) |
|
9284
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2296 { |
|
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2297 /* Registers and marks are read and kept separate from what |
|
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2298 * this Vim is using. They are merged when writing. */ |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2299 prepare_viminfo_registers(); |
|
9284
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2300 prepare_viminfo_marks(); |
|
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2301 } |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2302 |
| 1733 | 2303 eof = read_viminfo_up_to_marks(&vir, |
| 2304 flags & VIF_FORCEIT, fp_out != NULL); | |
|
4903
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
2305 merge = TRUE; |
|
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
2306 } |
|
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
2307 else if (flags != 0) |
| 7 | 2308 /* Skip info, find start of marks */ |
| 2309 while (!(eof = viminfo_readline(&vir)) | |
| 2310 && vir.vir_line[0] != '>') | |
| 2311 ; | |
|
9414
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2312 |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2313 do_copy_marks = (flags & |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2314 (VIF_WANT_MARKS | VIF_GET_OLDFILES | VIF_FORCEIT)); |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2315 } |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2316 |
| 7 | 2317 if (fp_out != NULL) |
| 2318 { | |
| 2319 /* Write the info: */ | |
| 2320 fprintf(fp_out, _("# This viminfo file was generated by Vim %s.\n"), | |
| 2321 VIM_VERSION_MEDIUM); | |
|
2545
298d8d6e69be
Avoid warnings from the clang compiler. (Dominique Pelle)
Bram Moolenaar <bram@vim.org>
parents:
2394
diff
changeset
|
2322 fputs(_("# You may edit it if you're careful!\n\n"), fp_out); |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2323 write_viminfo_version(fp_out); |
| 7 | 2324 #ifdef FEAT_MBYTE |
|
2545
298d8d6e69be
Avoid warnings from the clang compiler. (Dominique Pelle)
Bram Moolenaar <bram@vim.org>
parents:
2394
diff
changeset
|
2325 fputs(_("# Value of 'encoding' when this file was written\n"), fp_out); |
| 7 | 2326 fprintf(fp_out, "*encoding=%s\n\n", p_enc); |
| 2327 #endif | |
| 2328 write_viminfo_search_pattern(fp_out); | |
| 2329 write_viminfo_sub_string(fp_out); | |
| 2330 #ifdef FEAT_CMDHIST | |
|
4903
2fc1f3346bfb
updated for version 7.3.1197
Bram Moolenaar <bram@vim.org>
parents:
4805
diff
changeset
|
2331 write_viminfo_history(fp_out, merge); |
| 7 | 2332 #endif |
| 2333 write_viminfo_registers(fp_out); | |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2334 finish_viminfo_registers(); |
| 7 | 2335 #ifdef FEAT_EVAL |
| 2336 write_viminfo_varlist(fp_out); | |
| 2337 #endif | |
| 2338 write_viminfo_filemarks(fp_out); | |
|
9284
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2339 finish_viminfo_marks(); |
| 7 | 2340 write_viminfo_bufferlist(fp_out); |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2341 write_viminfo_barlines(&vir, fp_out); |
|
9414
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2342 |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2343 if (do_copy_marks) |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2344 ga_init2(&buflist, sizeof(buf_T *), 50); |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2345 write_viminfo_marks(fp_out, do_copy_marks ? &buflist : NULL); |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2346 } |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2347 |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2348 if (do_copy_marks) |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2349 { |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2350 copy_viminfo_marks(&vir, fp_out, &buflist, eof, flags); |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2351 if (fp_out != NULL) |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2352 ga_clear(&buflist); |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
2353 } |
| 7 | 2354 |
| 2355 vim_free(vir.vir_line); | |
| 2356 #ifdef FEAT_MBYTE | |
| 2357 if (vir.vir_conv.vc_type != CONV_NONE) | |
| 2358 convert_setup(&vir.vir_conv, NULL, NULL); | |
| 2359 #endif | |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2360 ga_clear_strings(&vir.vir_barlines); |
| 7 | 2361 } |
| 2362 | |
| 2363 /* | |
| 2364 * read_viminfo_up_to_marks() -- Only called from do_viminfo(). Reads in the | |
| 2365 * first part of the viminfo file which contains everything but the marks that | |
| 2366 * are local to a file. Returns TRUE when end-of-file is reached. -- webb | |
| 2367 */ | |
| 2368 static int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2369 read_viminfo_up_to_marks( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2370 vir_T *virp, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2371 int forceit, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2372 int writing) |
| 7 | 2373 { |
| 2374 int eof; | |
| 2375 buf_T *buf; | |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2376 int got_encoding = FALSE; |
| 7 | 2377 |
| 2378 #ifdef FEAT_CMDHIST | |
| 4285 | 2379 prepare_viminfo_history(forceit ? 9999 : 0, writing); |
| 7 | 2380 #endif |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2381 |
| 7 | 2382 eof = viminfo_readline(virp); |
| 2383 while (!eof && virp->vir_line[0] != '>') | |
| 2384 { | |
| 2385 switch (virp->vir_line[0]) | |
| 2386 { | |
| 2387 /* Characters reserved for future expansion, ignored now */ | |
| 2388 case '+': /* "+40 /path/dir file", for running vim without args */ | |
| 2389 case '^': /* to be defined */ | |
| 2390 case '<': /* long line - ignored */ | |
| 2391 /* A comment or empty line. */ | |
| 2392 case NUL: | |
| 2393 case '\r': | |
| 2394 case '\n': | |
| 2395 case '#': | |
| 2396 eof = viminfo_readline(virp); | |
| 2397 break; | |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2398 case '|': |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2399 eof = read_viminfo_barline(virp, got_encoding, |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2400 forceit, writing); |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2401 break; |
| 7 | 2402 case '*': /* "*encoding=value" */ |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2403 got_encoding = TRUE; |
| 7 | 2404 eof = viminfo_encoding(virp); |
| 2405 break; | |
| 2406 case '!': /* global variable */ | |
| 2407 #ifdef FEAT_EVAL | |
| 2408 eof = read_viminfo_varlist(virp, writing); | |
| 2409 #else | |
| 2410 eof = viminfo_readline(virp); | |
| 2411 #endif | |
| 2412 break; | |
| 2413 case '%': /* entry for buffer list */ | |
| 2414 eof = read_viminfo_bufferlist(virp, writing); | |
| 2415 break; | |
| 2416 case '"': | |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2417 /* When registers are in bar lines skip the old style register |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2418 * lines. */ |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2419 if (virp->vir_version < VIMINFO_VERSION_WITH_REGISTERS) |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2420 eof = read_viminfo_register(virp, forceit); |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2421 else |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2422 do { |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2423 eof = viminfo_readline(virp); |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2424 } while (!eof && (virp->vir_line[0] == TAB |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2425 || virp->vir_line[0] == '<')); |
| 7 | 2426 break; |
| 2427 case '/': /* Search string */ | |
| 2428 case '&': /* Substitute search string */ | |
| 2429 case '~': /* Last search string, followed by '/' or '&' */ | |
| 2430 eof = read_viminfo_search_pattern(virp, forceit); | |
| 2431 break; | |
| 2432 case '$': | |
| 2433 eof = read_viminfo_sub_string(virp, forceit); | |
| 2434 break; | |
| 2435 case ':': | |
| 2436 case '?': | |
| 2437 case '=': | |
| 2438 case '@': | |
| 2439 #ifdef FEAT_CMDHIST | |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2440 /* When history is in bar lines skip the old style history |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2441 * lines. */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2442 if (virp->vir_version < VIMINFO_VERSION_WITH_HISTORY) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2443 eof = read_viminfo_history(virp, writing); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2444 else |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2445 #endif |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2446 eof = viminfo_readline(virp); |
| 7 | 2447 break; |
| 2448 case '-': | |
| 2449 case '\'': | |
|
9297
9c663cda189f
commit https://github.com/vim/vim/commit/a641e1d4da3f9152c489318c06a93fcd1c746637
Christian Brabandt <cb@256bit.org>
parents:
9284
diff
changeset
|
2450 /* When file marks are in bar lines skip the old style lines. */ |
|
9c663cda189f
commit https://github.com/vim/vim/commit/a641e1d4da3f9152c489318c06a93fcd1c746637
Christian Brabandt <cb@256bit.org>
parents:
9284
diff
changeset
|
2451 if (virp->vir_version < VIMINFO_VERSION_WITH_MARKS) |
|
9c663cda189f
commit https://github.com/vim/vim/commit/a641e1d4da3f9152c489318c06a93fcd1c746637
Christian Brabandt <cb@256bit.org>
parents:
9284
diff
changeset
|
2452 eof = read_viminfo_filemark(virp, forceit); |
|
9c663cda189f
commit https://github.com/vim/vim/commit/a641e1d4da3f9152c489318c06a93fcd1c746637
Christian Brabandt <cb@256bit.org>
parents:
9284
diff
changeset
|
2453 else |
|
9c663cda189f
commit https://github.com/vim/vim/commit/a641e1d4da3f9152c489318c06a93fcd1c746637
Christian Brabandt <cb@256bit.org>
parents:
9284
diff
changeset
|
2454 eof = viminfo_readline(virp); |
| 7 | 2455 break; |
| 2456 default: | |
| 2457 if (viminfo_error("E575: ", _("Illegal starting char"), | |
| 2458 virp->vir_line)) | |
| 2459 eof = TRUE; | |
| 2460 else | |
| 2461 eof = viminfo_readline(virp); | |
| 2462 break; | |
| 2463 } | |
| 2464 } | |
| 2465 | |
| 2466 #ifdef FEAT_CMDHIST | |
| 2467 /* Finish reading history items. */ | |
| 4285 | 2468 if (!writing) |
|
9256
26c7bf23ec1d
commit https://github.com/vim/vim/commit/1fd99c1ca89a3d13bb53aff4a5a8f5ee740713e5
Christian Brabandt <cb@256bit.org>
parents:
9248
diff
changeset
|
2469 finish_viminfo_history(virp); |
| 7 | 2470 #endif |
| 2471 | |
| 2472 /* Change file names to buffer numbers for fmarks. */ | |
|
9649
fd9727ae3c49
commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
2473 FOR_ALL_BUFFERS(buf) |
| 7 | 2474 fmarks_check_names(buf); |
| 2475 | |
| 2476 return eof; | |
| 2477 } | |
| 2478 | |
| 2479 /* | |
| 2480 * Compare the 'encoding' value in the viminfo file with the current value of | |
| 2481 * 'encoding'. If different and the 'c' flag is in 'viminfo', setup for | |
| 2482 * conversion of text with iconv() in viminfo_readstring(). | |
| 2483 */ | |
| 2484 static int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2485 viminfo_encoding(vir_T *virp) |
| 7 | 2486 { |
| 2487 #ifdef FEAT_MBYTE | |
| 2488 char_u *p; | |
| 2489 int i; | |
| 2490 | |
| 2491 if (get_viminfo_parameter('c') != 0) | |
| 2492 { | |
| 2493 p = vim_strchr(virp->vir_line, '='); | |
| 2494 if (p != NULL) | |
| 2495 { | |
| 2496 /* remove trailing newline */ | |
| 2497 ++p; | |
| 2498 for (i = 0; vim_isprintc(p[i]); ++i) | |
| 2499 ; | |
| 2500 p[i] = NUL; | |
| 2501 | |
| 2502 convert_setup(&virp->vir_conv, p, p_enc); | |
| 2503 } | |
| 2504 } | |
| 2505 #endif | |
| 2506 return viminfo_readline(virp); | |
| 2507 } | |
| 2508 | |
| 2509 /* | |
| 2510 * Read a line from the viminfo file. | |
| 2511 * Returns TRUE for end-of-file; | |
| 2512 */ | |
| 2513 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2514 viminfo_readline(vir_T *virp) |
| 7 | 2515 { |
| 2516 return vim_fgets(virp->vir_line, LSIZE, virp->vir_fd); | |
| 2517 } | |
| 2518 | |
| 2519 /* | |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2520 * Check string read from viminfo file. |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2521 * Remove '\n' at the end of the line. |
| 7 | 2522 * - replace CTRL-V CTRL-V with CTRL-V |
| 2523 * - replace CTRL-V 'n' with '\n' | |
| 2524 * | |
| 2525 * Check for a long line as written by viminfo_writestring(). | |
| 2526 * | |
| 2527 * Return the string in allocated memory (NULL when out of memory). | |
| 2528 */ | |
| 2529 char_u * | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2530 viminfo_readstring( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2531 vir_T *virp, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2532 int off, /* offset for virp->vir_line */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2533 int convert UNUSED) /* convert the string */ |
| 7 | 2534 { |
| 2535 char_u *retval; | |
| 2536 char_u *s, *d; | |
| 2537 long len; | |
| 2538 | |
| 2539 if (virp->vir_line[off] == Ctrl_V && vim_isdigit(virp->vir_line[off + 1])) | |
| 2540 { | |
| 2541 len = atol((char *)virp->vir_line + off + 1); | |
| 2542 retval = lalloc(len, TRUE); | |
| 2543 if (retval == NULL) | |
| 2544 { | |
| 2545 /* Line too long? File messed up? Skip next line. */ | |
| 2546 (void)vim_fgets(virp->vir_line, 10, virp->vir_fd); | |
| 2547 return NULL; | |
| 2548 } | |
| 2549 (void)vim_fgets(retval, (int)len, virp->vir_fd); | |
| 2550 s = retval + 1; /* Skip the leading '<' */ | |
| 2551 } | |
| 2552 else | |
| 2553 { | |
| 2554 retval = vim_strsave(virp->vir_line + off); | |
| 2555 if (retval == NULL) | |
| 2556 return NULL; | |
| 2557 s = retval; | |
| 2558 } | |
| 2559 | |
| 2560 /* Change CTRL-V CTRL-V to CTRL-V and CTRL-V n to \n in-place. */ | |
| 2561 d = retval; | |
| 2562 while (*s != NUL && *s != '\n') | |
| 2563 { | |
| 2564 if (s[0] == Ctrl_V && s[1] != NUL) | |
| 2565 { | |
| 2566 if (s[1] == 'n') | |
| 2567 *d++ = '\n'; | |
| 2568 else | |
| 2569 *d++ = Ctrl_V; | |
| 2570 s += 2; | |
| 2571 } | |
| 2572 else | |
| 2573 *d++ = *s++; | |
| 2574 } | |
| 2575 *d = NUL; | |
| 2576 | |
| 2577 #ifdef FEAT_MBYTE | |
| 2578 if (convert && virp->vir_conv.vc_type != CONV_NONE && *retval != NUL) | |
| 2579 { | |
| 2580 d = string_convert(&virp->vir_conv, retval, NULL); | |
| 2581 if (d != NULL) | |
| 2582 { | |
| 2583 vim_free(retval); | |
| 2584 retval = d; | |
| 2585 } | |
| 2586 } | |
| 2587 #endif | |
| 2588 | |
| 2589 return retval; | |
| 2590 } | |
| 2591 | |
| 2592 /* | |
| 2593 * write string to viminfo file | |
| 2594 * - replace CTRL-V with CTRL-V CTRL-V | |
| 2595 * - replace '\n' with CTRL-V 'n' | |
| 2596 * - add a '\n' at the end | |
| 2597 * | |
| 2598 * For a long line: | |
| 2599 * - write " CTRL-V <length> \n " in first line | |
| 2600 * - write " < <string> \n " in second line | |
| 2601 */ | |
| 2602 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
2603 viminfo_writestring(FILE *fd, char_u *p) |
| 7 | 2604 { |
| 2605 int c; | |
| 2606 char_u *s; | |
| 2607 int len = 0; | |
| 2608 | |
| 2609 for (s = p; *s != NUL; ++s) | |
| 2610 { | |
| 2611 if (*s == Ctrl_V || *s == '\n') | |
| 2612 ++len; | |
| 2613 ++len; | |
| 2614 } | |
| 2615 | |
| 2616 /* If the string will be too long, write its length and put it in the next | |
| 2617 * line. Take into account that some room is needed for what comes before | |
| 2618 * the string (e.g., variable name). Add something to the length for the | |
| 2619 * '<', NL and trailing NUL. */ | |
| 2620 if (len > LSIZE / 2) | |
| 2621 fprintf(fd, IF_EB("\026%d\n<", CTRL_V_STR "%d\n<"), len + 3); | |
| 2622 | |
| 2623 while ((c = *p++) != NUL) | |
| 2624 { | |
| 2625 if (c == Ctrl_V || c == '\n') | |
| 2626 { | |
| 2627 putc(Ctrl_V, fd); | |
| 2628 if (c == '\n') | |
| 2629 c = 'n'; | |
| 2630 } | |
| 2631 putc(c, fd); | |
| 2632 } | |
| 2633 putc('\n', fd); | |
| 2634 } | |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2635 |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2636 /* |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2637 * Write a string in quotes that barline_parse() can read back. |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2638 * Breaks the line in less than LSIZE pieces when needed. |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2639 * Returns remaining characters in the line. |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2640 */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2641 int |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2642 barline_writestring(FILE *fd, char_u *s, int remaining_start) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2643 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2644 char_u *p; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2645 int remaining = remaining_start; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2646 int len = 2; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2647 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2648 /* Count the number of characters produced, including quotes. */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2649 for (p = s; *p != NUL; ++p) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2650 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2651 if (*p == NL) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2652 len += 2; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2653 else if (*p == '"' || *p == '\\') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2654 len += 2; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2655 else |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2656 ++len; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2657 } |
|
9978
baad324e9fbc
commit https://github.com/vim/vim/commit/257095760732597983bdd026e791907b7980e295
Christian Brabandt <cb@256bit.org>
parents:
9959
diff
changeset
|
2658 if (len > remaining - 2) |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2659 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2660 fprintf(fd, ">%d\n|<", len); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2661 remaining = LSIZE - 20; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2662 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2663 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2664 putc('"', fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2665 for (p = s; *p != NUL; ++p) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2666 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2667 if (*p == NL) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2668 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2669 putc('\\', fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2670 putc('n', fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2671 --remaining; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2672 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2673 else if (*p == '"' || *p == '\\') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2674 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2675 putc('\\', fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2676 putc(*p, fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2677 --remaining; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2678 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2679 else |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2680 putc(*p, fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2681 --remaining; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2682 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2683 if (remaining < 3) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2684 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2685 putc('\n', fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2686 putc('|', fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2687 putc('<', fd); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2688 /* Leave enough space for another continuation. */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2689 remaining = LSIZE - 20; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2690 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2691 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2692 putc('"', fd); |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2693 return remaining - 2; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2694 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2695 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2696 /* |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2697 * Parse a viminfo line starting with '|'. |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2698 * Add each decoded value to "values". |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2699 * Returns TRUE if the next line is to be read after using the parsed values. |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2700 */ |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2701 static int |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2702 barline_parse(vir_T *virp, char_u *text, garray_T *values) |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2703 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2704 char_u *p = text; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2705 char_u *nextp = NULL; |
|
9244
931bbf7b6ee3
commit https://github.com/vim/vim/commit/fdd82fe365d0e287bafc71f98c039cb5af8ed827
Christian Brabandt <cb@256bit.org>
parents:
9240
diff
changeset
|
2706 char_u *buf = NULL; |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2707 bval_T *value; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2708 int i; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2709 int allocated = FALSE; |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2710 int eof; |
|
9268
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2711 #ifdef FEAT_MBYTE |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2712 char_u *sconv; |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2713 int converted; |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2714 #endif |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2715 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2716 while (*p == ',') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2717 { |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2718 ++p; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2719 if (ga_grow(values, 1) == FAIL) |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2720 break; |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2721 value = (bval_T *)(values->ga_data) + values->ga_len; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2722 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2723 if (*p == '>') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2724 { |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2725 /* Need to read a continuation line. Put strings in allocated |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2726 * memory, because virp->vir_line is overwritten. */ |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2727 if (!allocated) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2728 { |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2729 for (i = 0; i < values->ga_len; ++i) |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2730 { |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2731 bval_T *vp = (bval_T *)(values->ga_data) + i; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2732 |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2733 if (vp->bv_type == BVAL_STRING && !vp->bv_allocated) |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2734 { |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2735 vp->bv_string = vim_strnsave(vp->bv_string, vp->bv_len); |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2736 vp->bv_allocated = TRUE; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2737 } |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2738 } |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2739 allocated = TRUE; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2740 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2741 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2742 if (vim_isdigit(p[1])) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2743 { |
|
9248
9c751c33dc0f
commit https://github.com/vim/vim/commit/1d5f1d07aedb6f149f5de145b1dfd6528a769c93
Christian Brabandt <cb@256bit.org>
parents:
9244
diff
changeset
|
2744 size_t len; |
|
9c751c33dc0f
commit https://github.com/vim/vim/commit/1d5f1d07aedb6f149f5de145b1dfd6528a769c93
Christian Brabandt <cb@256bit.org>
parents:
9244
diff
changeset
|
2745 size_t todo; |
|
9c751c33dc0f
commit https://github.com/vim/vim/commit/1d5f1d07aedb6f149f5de145b1dfd6528a769c93
Christian Brabandt <cb@256bit.org>
parents:
9244
diff
changeset
|
2746 size_t n; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2747 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2748 /* String value was split into lines that are each shorter |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2749 * than LSIZE: |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2750 * |{bartype},>{length of "{text}{text2}"} |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2751 * |<"{text1} |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2752 * |<{text2}",{value} |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2753 * Length includes the quotes. |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2754 */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2755 ++p; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2756 len = getdigits(&p); |
|
9248
9c751c33dc0f
commit https://github.com/vim/vim/commit/1d5f1d07aedb6f149f5de145b1dfd6528a769c93
Christian Brabandt <cb@256bit.org>
parents:
9244
diff
changeset
|
2757 buf = alloc((int)(len + 1)); |
|
9270
79cb08f0d812
commit https://github.com/vim/vim/commit/62f8b4e18014b259bcde4a2845c602b0a44a3714
Christian Brabandt <cb@256bit.org>
parents:
9268
diff
changeset
|
2758 if (buf == NULL) |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2759 return TRUE; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2760 p = buf; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2761 for (todo = len; todo > 0; todo -= n) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2762 { |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2763 eof = viminfo_readline(virp); |
|
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2764 if (eof || virp->vir_line[0] != '|' |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2765 || virp->vir_line[1] != '<') |
|
9270
79cb08f0d812
commit https://github.com/vim/vim/commit/62f8b4e18014b259bcde4a2845c602b0a44a3714
Christian Brabandt <cb@256bit.org>
parents:
9268
diff
changeset
|
2766 { |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2767 /* File was truncated or garbled. Read another line if |
|
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2768 * this one starts with '|'. */ |
|
9270
79cb08f0d812
commit https://github.com/vim/vim/commit/62f8b4e18014b259bcde4a2845c602b0a44a3714
Christian Brabandt <cb@256bit.org>
parents:
9268
diff
changeset
|
2769 vim_free(buf); |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2770 return eof || virp->vir_line[0] == '|'; |
|
9270
79cb08f0d812
commit https://github.com/vim/vim/commit/62f8b4e18014b259bcde4a2845c602b0a44a3714
Christian Brabandt <cb@256bit.org>
parents:
9268
diff
changeset
|
2771 } |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2772 /* Get length of text, excluding |< and NL chars. */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2773 n = STRLEN(virp->vir_line); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2774 while (n > 0 && (virp->vir_line[n - 1] == NL |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2775 || virp->vir_line[n - 1] == CAR)) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2776 --n; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2777 n -= 2; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2778 if (n > todo) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2779 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2780 /* more values follow after the string */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2781 nextp = virp->vir_line + 2 + todo; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2782 n = todo; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2783 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2784 mch_memmove(p, virp->vir_line + 2, n); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2785 p += n; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2786 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2787 *p = NUL; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2788 p = buf; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2789 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2790 else |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2791 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2792 /* Line ending in ">" continues in the next line: |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2793 * |{bartype},{lots of values},> |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2794 * |<{value},{value} |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2795 */ |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2796 eof = viminfo_readline(virp); |
|
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2797 if (eof || virp->vir_line[0] != '|' |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2798 || virp->vir_line[1] != '<') |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2799 /* File was truncated or garbled. Read another line if |
|
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2800 * this one starts with '|'. */ |
|
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2801 return eof || virp->vir_line[0] == '|'; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2802 p = virp->vir_line + 2; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2803 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2804 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2805 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2806 if (isdigit(*p)) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2807 { |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2808 value->bv_type = BVAL_NR; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2809 value->bv_nr = getdigits(&p); |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2810 ++values->ga_len; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2811 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2812 else if (*p == '"') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2813 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2814 int len = 0; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2815 char_u *s = p; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2816 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2817 /* Unescape special characters in-place. */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2818 ++p; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2819 while (*p != '"') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2820 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2821 if (*p == NL || *p == NUL) |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2822 return TRUE; /* syntax error, drop the value */ |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2823 if (*p == '\\') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2824 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2825 ++p; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2826 if (*p == 'n') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2827 s[len++] = '\n'; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2828 else |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2829 s[len++] = *p; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2830 ++p; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2831 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2832 else |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2833 s[len++] = *p++; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2834 } |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2835 ++p; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2836 s[len] = NUL; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2837 |
|
9268
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2838 #ifdef FEAT_MBYTE |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2839 converted = FALSE; |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2840 if (virp->vir_conv.vc_type != CONV_NONE && *s != NUL) |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2841 { |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2842 sconv = string_convert(&virp->vir_conv, s, NULL); |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2843 if (sconv != NULL) |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2844 { |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2845 if (s == buf) |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2846 vim_free(s); |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2847 s = sconv; |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2848 buf = s; |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2849 converted = TRUE; |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2850 } |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2851 } |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2852 #endif |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2853 /* Need to copy in allocated memory if the string wasn't allocated |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2854 * above and we did allocate before, thus vir_line may change. */ |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2855 if (s != buf && allocated) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2856 s = vim_strsave(s); |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2857 value->bv_string = s; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2858 value->bv_type = BVAL_STRING; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2859 value->bv_len = len; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2860 value->bv_allocated = allocated |
|
9268
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2861 #ifdef FEAT_MBYTE |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2862 || converted |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2863 #endif |
|
a00e32b5bb39
commit https://github.com/vim/vim/commit/012270936c3c7df3bba45ad2b48938c23a2fd43a
Christian Brabandt <cb@256bit.org>
parents:
9260
diff
changeset
|
2864 ; |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2865 ++values->ga_len; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2866 if (nextp != NULL) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2867 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2868 /* values following a long string */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2869 p = nextp; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2870 nextp = NULL; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2871 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2872 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2873 else if (*p == ',') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2874 { |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2875 value->bv_type = BVAL_EMPTY; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2876 ++values->ga_len; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2877 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2878 else |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2879 break; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2880 } |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2881 return TRUE; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2882 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2883 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2884 static int |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2885 read_viminfo_barline(vir_T *virp, int got_encoding, int force, int writing) |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2886 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2887 char_u *p = virp->vir_line + 1; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2888 int bartype; |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2889 garray_T values; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2890 bval_T *vp; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2891 int i; |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2892 int read_next = TRUE; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2893 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2894 /* The format is: |{bartype},{value},... |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2895 * For a very long string: |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2896 * |{bartype},>{length of "{text}{text2}"} |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2897 * |<{text1} |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2898 * |<{text2},{value} |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2899 * For a long line not using a string |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2900 * |{bartype},{lots of values},> |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2901 * |<{value},{value} |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2902 */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2903 if (*p == '<') |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2904 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2905 /* Continuation line of an unrecognized item. */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2906 if (writing) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2907 ga_add_string(&virp->vir_barlines, virp->vir_line); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2908 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2909 else |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2910 { |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2911 ga_init2(&values, sizeof(bval_T), 20); |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2912 bartype = getdigits(&p); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2913 switch (bartype) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2914 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2915 case BARTYPE_VERSION: |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2916 /* Only use the version when it comes before the encoding. |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2917 * If it comes later it was copied by a Vim version that |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2918 * doesn't understand the version. */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2919 if (!got_encoding) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2920 { |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2921 read_next = barline_parse(virp, p, &values); |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2922 vp = (bval_T *)values.ga_data; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2923 if (values.ga_len > 0 && vp->bv_type == BVAL_NR) |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2924 virp->vir_version = vp->bv_nr; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2925 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2926 break; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2927 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2928 case BARTYPE_HISTORY: |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2929 read_next = barline_parse(virp, p, &values); |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2930 handle_viminfo_history(&values, writing); |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2931 break; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2932 |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2933 case BARTYPE_REGISTER: |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2934 read_next = barline_parse(virp, p, &values); |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2935 handle_viminfo_register(&values, force); |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2936 break; |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2937 |
|
9284
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2938 case BARTYPE_MARK: |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2939 read_next = barline_parse(virp, p, &values); |
|
9284
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2940 handle_viminfo_mark(&values, force); |
|
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2941 break; |
|
78712a2f687a
commit https://github.com/vim/vim/commit/2d35899721da0e9359a9fe1059554f8c4ea7f0c1
Christian Brabandt <cb@256bit.org>
parents:
9276
diff
changeset
|
2942 |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2943 default: |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2944 /* copy unrecognized line (for future use) */ |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2945 if (writing) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2946 ga_add_string(&virp->vir_barlines, virp->vir_line); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2947 } |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2948 for (i = 0; i < values.ga_len; ++i) |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2949 { |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2950 vp = (bval_T *)values.ga_data + i; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2951 if (vp->bv_type == BVAL_STRING && vp->bv_allocated) |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2952 vim_free(vp->bv_string); |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2953 } |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2954 ga_clear(&values); |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2955 } |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2956 |
|
9330
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2957 if (read_next) |
|
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2958 return viminfo_readline(virp); |
|
8cb76e38c346
commit https://github.com/vim/vim/commit/ecefe71704850b94df44f65fc756c1551ec68388
Christian Brabandt <cb@256bit.org>
parents:
9297
diff
changeset
|
2959 return FALSE; |
|
9240
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2960 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2961 |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2962 static void |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2963 write_viminfo_version(FILE *fp_out) |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2964 { |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2965 fprintf(fp_out, "# Viminfo version\n|%d,%d\n\n", |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2966 BARTYPE_VERSION, VIMINFO_VERSION); |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2967 } |
|
636cfa97200e
commit https://github.com/vim/vim/commit/45d2eeaad66939348893b9254171067b0457cd9d
Christian Brabandt <cb@256bit.org>
parents:
9234
diff
changeset
|
2968 |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2969 static void |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2970 write_viminfo_barlines(vir_T *virp, FILE *fp_out) |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2971 { |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2972 int i; |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2973 garray_T *gap = &virp->vir_barlines; |
|
9412
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2974 int seen_useful = FALSE; |
|
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2975 char *line; |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2976 |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2977 if (gap->ga_len > 0) |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2978 { |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2979 fputs(_("\n# Bar lines, copied verbatim:\n"), fp_out); |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2980 |
|
9412
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2981 /* Skip over continuation lines until seeing a useful line. */ |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2982 for (i = 0; i < gap->ga_len; ++i) |
|
9412
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2983 { |
|
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2984 line = ((char **)(gap->ga_data))[i]; |
|
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2985 if (seen_useful || line[1] != '<') |
|
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2986 { |
|
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2987 fputs(line, fp_out); |
|
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2988 seen_useful = TRUE; |
|
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2989 } |
|
80333fcbaddf
commit https://github.com/vim/vim/commit/dec85cf75044ed94f611c825a7a0b0050a2597b9
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2990 } |
|
7664
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2991 } |
|
1fded31d9e04
commit https://github.com/vim/vim/commit/b20e334859334be35de4b295023a2b49bdabbfa9
Christian Brabandt <cb@256bit.org>
parents:
7447
diff
changeset
|
2992 } |
| 7 | 2993 #endif /* FEAT_VIMINFO */ |
| 2994 | |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2995 /* |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2996 * Return the current time in seconds. Calls time(), unless test_settime() |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2997 * was used. |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
2998 */ |
|
9347
25c562442f8c
commit https://github.com/vim/vim/commit/f4fba6dcd508cb369ffa6916d9cb3fcf3d7ed548
Christian Brabandt <cb@256bit.org>
parents:
9330
diff
changeset
|
2999 time_T |
|
9272
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3000 vim_time(void) |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3001 { |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3002 # ifdef FEAT_EVAL |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3003 return time_for_testing == 0 ? time(NULL) : time_for_testing; |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3004 # else |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3005 return time(NULL); |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3006 # endif |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3007 } |
|
f5d9eb512f8b
commit https://github.com/vim/vim/commit/46bbb0c4ba27395859dfeaa26938483946bb4ec2
Christian Brabandt <cb@256bit.org>
parents:
9270
diff
changeset
|
3008 |
| 7 | 3009 /* |
| 3010 * Implementation of ":fixdel", also used by get_stty(). | |
| 3011 * <BS> resulting <Del> | |
| 3012 * ^? ^H | |
| 3013 * not ^? ^? | |
| 3014 */ | |
| 3015 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3016 do_fixdel(exarg_T *eap UNUSED) |
| 7 | 3017 { |
| 3018 char_u *p; | |
| 3019 | |
| 3020 p = find_termcode((char_u *)"kb"); | |
| 3021 add_termcode((char_u *)"kD", p != NULL | |
| 3022 && *p == DEL ? (char_u *)CTRL_H_STR : DEL_STR, FALSE); | |
| 3023 } | |
| 3024 | |
| 3025 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3026 print_line_no_prefix( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3027 linenr_T lnum, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3028 int use_number, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3029 int list) |
| 7 | 3030 { |
| 13 | 3031 char_u numbuf[30]; |
| 7 | 3032 |
| 3033 if (curwin->w_p_nu || use_number) | |
| 3034 { | |
| 1872 | 3035 vim_snprintf((char *)numbuf, sizeof(numbuf), |
| 3036 "%*ld ", number_width(curwin), (long)lnum); | |
|
11158
501f46f7644c
patch 8.0.0466: still macros that should be all-caps
Christian Brabandt <cb@256bit.org>
parents:
11144
diff
changeset
|
3037 msg_puts_attr(numbuf, HL_ATTR(HLF_N)); /* Highlight line nrs */ |
| 7 | 3038 } |
| 169 | 3039 msg_prt_line(ml_get(lnum), list); |
| 7 | 3040 } |
| 3041 | |
| 3042 /* | |
| 3043 * Print a text line. Also in silent mode ("ex -s"). | |
| 3044 */ | |
| 3045 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3046 print_line(linenr_T lnum, int use_number, int list) |
| 7 | 3047 { |
| 3048 int save_silent = silent_mode; | |
| 3049 | |
|
9980
b222552cf0c4
commit https://github.com/vim/vim/commit/d29459baa61819e59961804ed258efac5733ec70
Christian Brabandt <cb@256bit.org>
parents:
9978
diff
changeset
|
3050 /* apply :filter /pat/ */ |
|
b222552cf0c4
commit https://github.com/vim/vim/commit/d29459baa61819e59961804ed258efac5733ec70
Christian Brabandt <cb@256bit.org>
parents:
9978
diff
changeset
|
3051 if (message_filtered(ml_get(lnum))) |
|
b222552cf0c4
commit https://github.com/vim/vim/commit/d29459baa61819e59961804ed258efac5733ec70
Christian Brabandt <cb@256bit.org>
parents:
9978
diff
changeset
|
3052 return; |
|
b222552cf0c4
commit https://github.com/vim/vim/commit/d29459baa61819e59961804ed258efac5733ec70
Christian Brabandt <cb@256bit.org>
parents:
9978
diff
changeset
|
3053 |
| 169 | 3054 msg_start(); |
| 7 | 3055 silent_mode = FALSE; |
| 169 | 3056 info_message = TRUE; /* use mch_msg(), not mch_errmsg() */ |
| 3057 print_line_no_prefix(lnum, use_number, list); | |
| 7 | 3058 if (save_silent) |
| 3059 { | |
| 3060 msg_putchar('\n'); | |
| 3061 cursor_on(); /* msg_start() switches it off */ | |
| 3062 out_flush(); | |
| 3063 silent_mode = save_silent; | |
| 1798 | 3064 } |
| 3065 info_message = FALSE; | |
| 7 | 3066 } |
| 3067 | |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3068 int |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3069 rename_buffer(char_u *new_fname) |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3070 { |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3071 char_u *fname, *sfname, *xfname; |
|
4613
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3072 buf_T *buf; |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3073 |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3074 buf = curbuf; |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3075 apply_autocmds(EVENT_BUFFILEPRE, NULL, NULL, FALSE, curbuf); |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3076 /* buffer changed, don't change name now */ |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3077 if (buf != curbuf) |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3078 return FAIL; |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3079 #ifdef FEAT_EVAL |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3080 if (aborting()) /* autocmds may abort script processing */ |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3081 return FAIL; |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3082 #endif |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3083 /* |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3084 * The name of the current buffer will be changed. |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3085 * A new (unlisted) buffer entry needs to be made to hold the old file |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3086 * name, which will become the alternate file name. |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3087 * But don't set the alternate file name if the buffer didn't have a |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3088 * name. |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3089 */ |
|
4613
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3090 fname = curbuf->b_ffname; |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3091 sfname = curbuf->b_sfname; |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3092 xfname = curbuf->b_fname; |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3093 curbuf->b_ffname = NULL; |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3094 curbuf->b_sfname = NULL; |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3095 if (setfname(curbuf, new_fname, NULL, TRUE) == FAIL) |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3096 { |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3097 curbuf->b_ffname = fname; |
|
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3098 curbuf->b_sfname = sfname; |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3099 return FAIL; |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3100 } |
|
4613
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3101 curbuf->b_flags |= BF_NOTEDITED; |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3102 if (xfname != NULL && *xfname != NUL) |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3103 { |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3104 buf = buflist_new(fname, xfname, curwin->w_cursor.lnum, 0); |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3105 if (buf != NULL && !cmdmod.keepalt) |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3106 curwin->w_alt_fnum = buf->b_fnum; |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3107 } |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3108 vim_free(fname); |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3109 vim_free(sfname); |
|
4613
219b2fcad60d
updated for version 7.3.1054
Bram Moolenaar <bram@vim.org>
parents:
4589
diff
changeset
|
3110 apply_autocmds(EVENT_BUFFILEPOST, NULL, NULL, FALSE, curbuf); |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3111 |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3112 /* Change directories when the 'acd' option is set. */ |
|
13632
cec5137d5332
patch 8.0.1688: some macros are used without a semicolon
Christian Brabandt <cb@256bit.org>
parents:
13553
diff
changeset
|
3113 DO_AUTOCHDIR; |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3114 return OK; |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3115 } |
|
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3116 |
| 7 | 3117 /* |
| 3118 * ":file[!] [fname]". | |
| 3119 */ | |
| 3120 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3121 ex_file(exarg_T *eap) |
| 7 | 3122 { |
| 14 | 3123 /* ":0file" removes the file name. Check for illegal uses ":3file", |
| 3124 * "0file name", etc. */ | |
| 3125 if (eap->addr_count > 0 | |
| 3126 && (*eap->arg != NUL | |
| 3127 || eap->line2 > 0 | |
| 3128 || eap->addr_count > 1)) | |
| 3129 { | |
| 3130 EMSG(_(e_invarg)); | |
| 3131 return; | |
| 3132 } | |
| 3133 | |
| 3134 if (*eap->arg != NUL || eap->addr_count == 1) | |
| 7 | 3135 { |
|
4589
fa39483a1363
updated for version 7.3.1042
Bram Moolenaar <bram@vim.org>
parents:
4285
diff
changeset
|
3136 if (rename_buffer(eap->arg) == FAIL) |
| 7 | 3137 return; |
|
14185
20468fb49f9b
patch 8.1.0110: file name not displayed with ":file"
Christian Brabandt <cb@256bit.org>
parents:
14175
diff
changeset
|
3138 redraw_tabline = TRUE; |
|
20468fb49f9b
patch 8.1.0110: file name not displayed with ":file"
Christian Brabandt <cb@256bit.org>
parents:
14175
diff
changeset
|
3139 } |
|
20468fb49f9b
patch 8.1.0110: file name not displayed with ":file"
Christian Brabandt <cb@256bit.org>
parents:
14175
diff
changeset
|
3140 |
|
20468fb49f9b
patch 8.1.0110: file name not displayed with ":file"
Christian Brabandt <cb@256bit.org>
parents:
14175
diff
changeset
|
3141 // print file name if no argument or 'F' is not in 'shortmess' |
|
20468fb49f9b
patch 8.1.0110: file name not displayed with ":file"
Christian Brabandt <cb@256bit.org>
parents:
14175
diff
changeset
|
3142 if (*eap->arg == NUL || !shortmess(SHM_FILEINFO)) |
|
8560
f3c636c673f7
commit https://github.com/vim/vim/commit/426dd0219512af5f4abeb0901b533159253ffba3
Christian Brabandt <cb@256bit.org>
parents:
8556
diff
changeset
|
3143 fileinfo(FALSE, FALSE, eap->forceit); |
| 7 | 3144 } |
| 3145 | |
| 3146 /* | |
| 3147 * ":update". | |
| 3148 */ | |
| 3149 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3150 ex_update(exarg_T *eap) |
| 7 | 3151 { |
| 3152 if (curbufIsChanged()) | |
| 3153 (void)do_write(eap); | |
| 3154 } | |
| 3155 | |
| 3156 /* | |
| 3157 * ":write" and ":saveas". | |
| 3158 */ | |
| 3159 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3160 ex_write(exarg_T *eap) |
| 7 | 3161 { |
| 3162 if (eap->usefilter) /* input lines to shell command */ | |
| 3163 do_bang(1, eap, FALSE, TRUE, FALSE); | |
| 3164 else | |
| 3165 (void)do_write(eap); | |
| 3166 } | |
| 3167 | |
| 3168 /* | |
| 3169 * write current buffer to file 'eap->arg' | |
| 3170 * if 'eap->append' is TRUE, append to the file | |
| 3171 * | |
| 3172 * if *eap->arg == NUL write to current file | |
| 3173 * | |
| 3174 * return FAIL for failure, OK otherwise | |
| 3175 */ | |
| 3176 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3177 do_write(exarg_T *eap) |
| 7 | 3178 { |
| 3179 int other; | |
| 3180 char_u *fname = NULL; /* init to shut up gcc */ | |
| 3181 char_u *ffname; | |
| 3182 int retval = FAIL; | |
| 3183 char_u *free_fname = NULL; | |
| 3184 #ifdef FEAT_BROWSE | |
| 3185 char_u *browse_file = NULL; | |
| 3186 #endif | |
| 3187 buf_T *alt_buf = NULL; | |
|
9469
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3188 int name_was_missing; |
| 7 | 3189 |
| 3190 if (not_writing()) /* check 'write' option */ | |
| 3191 return FAIL; | |
| 3192 | |
| 3193 ffname = eap->arg; | |
| 3194 #ifdef FEAT_BROWSE | |
| 3195 if (cmdmod.browse) | |
| 3196 { | |
| 29 | 3197 browse_file = do_browse(BROWSE_SAVE, (char_u *)_("Save As"), ffname, |
| 7 | 3198 NULL, NULL, NULL, curbuf); |
| 3199 if (browse_file == NULL) | |
| 3200 goto theend; | |
| 3201 ffname = browse_file; | |
| 3202 } | |
| 3203 #endif | |
| 3204 if (*ffname == NUL) | |
| 3205 { | |
| 3206 if (eap->cmdidx == CMD_saveas) | |
| 3207 { | |
| 3208 EMSG(_(e_argreq)); | |
| 3209 goto theend; | |
| 3210 } | |
| 3211 other = FALSE; | |
| 3212 } | |
| 3213 else | |
| 3214 { | |
| 3215 fname = ffname; | |
| 3216 free_fname = fix_fname(ffname); | |
| 3217 /* | |
| 3218 * When out-of-memory, keep unexpanded file name, because we MUST be | |
| 3219 * able to write the file in this situation. | |
| 3220 */ | |
| 3221 if (free_fname != NULL) | |
| 3222 ffname = free_fname; | |
| 3223 other = otherfile(ffname); | |
| 3224 } | |
| 3225 | |
| 3226 /* | |
| 3227 * If we have a new file, put its name in the list of alternate file names. | |
| 3228 */ | |
| 3229 if (other) | |
| 3230 { | |
| 3231 if (vim_strchr(p_cpo, CPO_ALTWRITE) != NULL | |
| 3232 || eap->cmdidx == CMD_saveas) | |
| 3233 alt_buf = setaltfname(ffname, fname, (linenr_T)1); | |
| 3234 else | |
| 3235 alt_buf = buflist_findname(ffname); | |
| 3236 if (alt_buf != NULL && alt_buf->b_ml.ml_mfp != NULL) | |
| 3237 { | |
| 3238 /* Overwriting a file that is loaded in another buffer is not a | |
| 3239 * good idea. */ | |
| 315 | 3240 EMSG(_(e_bufloaded)); |
| 7 | 3241 goto theend; |
| 3242 } | |
| 3243 } | |
| 3244 | |
| 3245 /* | |
| 3246 * Writing to the current file is not allowed in readonly mode | |
| 3247 * and a file name is required. | |
| 3248 * "nofile" and "nowrite" buffers cannot be written implicitly either. | |
| 3249 */ | |
| 3250 if (!other && ( | |
| 3251 #ifdef FEAT_QUICKFIX | |
| 3252 bt_dontwrite_msg(curbuf) || | |
| 3253 #endif | |
| 3254 check_fname() == FAIL || check_readonly(&eap->forceit, curbuf))) | |
| 3255 goto theend; | |
| 3256 | |
| 3257 if (!other) | |
| 3258 { | |
| 3259 ffname = curbuf->b_ffname; | |
| 3260 fname = curbuf->b_fname; | |
| 3261 /* | |
| 3262 * Not writing the whole file is only allowed with '!'. | |
| 3263 */ | |
| 3264 if ( (eap->line1 != 1 | |
| 3265 || eap->line2 != curbuf->b_ml.ml_line_count) | |
| 3266 && !eap->forceit | |
| 3267 && !eap->append | |
| 3268 && !p_wa) | |
| 3269 { | |
| 3270 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG) | |
| 3271 if (p_confirm || cmdmod.confirm) | |
| 3272 { | |
| 3273 if (vim_dialog_yesno(VIM_QUESTION, NULL, | |
| 3274 (char_u *)_("Write partial file?"), 2) != VIM_YES) | |
| 3275 goto theend; | |
| 3276 eap->forceit = TRUE; | |
| 3277 } | |
| 3278 else | |
| 3279 #endif | |
| 3280 { | |
| 3281 EMSG(_("E140: Use ! to write partial buffer")); | |
| 3282 goto theend; | |
| 3283 } | |
| 3284 } | |
| 3285 } | |
| 3286 | |
| 3287 if (check_overwrite(eap, curbuf, fname, ffname, other) == OK) | |
| 3288 { | |
| 3289 if (eap->cmdidx == CMD_saveas && alt_buf != NULL) | |
| 3290 { | |
| 3291 buf_T *was_curbuf = curbuf; | |
| 3292 | |
| 3293 apply_autocmds(EVENT_BUFFILEPRE, NULL, NULL, FALSE, curbuf); | |
| 21 | 3294 apply_autocmds(EVENT_BUFFILEPRE, NULL, NULL, FALSE, alt_buf); |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3295 #ifdef FEAT_EVAL |
| 7 | 3296 if (curbuf != was_curbuf || aborting()) |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3297 #else |
| 7 | 3298 if (curbuf != was_curbuf) |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3299 #endif |
| 7 | 3300 { |
| 3301 /* buffer changed, don't change name now */ | |
| 3302 retval = FAIL; | |
| 3303 goto theend; | |
| 3304 } | |
| 3305 /* Exchange the file names for the current and the alternate | |
| 3306 * buffer. This makes it look like we are now editing the buffer | |
| 3307 * under the new name. Must be done before buf_write(), because | |
| 3308 * if there is no file name and 'cpo' contains 'F', it will set | |
| 3309 * the file name. */ | |
| 3310 fname = alt_buf->b_fname; | |
| 3311 alt_buf->b_fname = curbuf->b_fname; | |
| 3312 curbuf->b_fname = fname; | |
| 3313 fname = alt_buf->b_ffname; | |
| 3314 alt_buf->b_ffname = curbuf->b_ffname; | |
| 3315 curbuf->b_ffname = fname; | |
| 3316 fname = alt_buf->b_sfname; | |
| 3317 alt_buf->b_sfname = curbuf->b_sfname; | |
| 3318 curbuf->b_sfname = fname; | |
| 3319 buf_name_changed(curbuf); | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3320 |
| 7 | 3321 apply_autocmds(EVENT_BUFFILEPOST, NULL, NULL, FALSE, curbuf); |
| 21 | 3322 apply_autocmds(EVENT_BUFFILEPOST, NULL, NULL, FALSE, alt_buf); |
| 7 | 3323 if (!alt_buf->b_p_bl) |
| 3324 { | |
| 3325 alt_buf->b_p_bl = TRUE; | |
| 3326 apply_autocmds(EVENT_BUFADD, NULL, NULL, FALSE, alt_buf); | |
| 3327 } | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3328 #ifdef FEAT_EVAL |
| 7 | 3329 if (curbuf != was_curbuf || aborting()) |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3330 #else |
| 7 | 3331 if (curbuf != was_curbuf) |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3332 #endif |
| 7 | 3333 { |
| 3334 /* buffer changed, don't write the file */ | |
| 3335 retval = FAIL; | |
| 3336 goto theend; | |
| 3337 } | |
| 634 | 3338 |
| 3339 /* If 'filetype' was empty try detecting it now. */ | |
| 3340 if (*curbuf->b_p_ft == NUL) | |
| 3341 { | |
| 819 | 3342 if (au_has_group((char_u *)"filetypedetect")) |
| 3343 (void)do_doautocmd((char_u *)"filetypedetect BufRead", | |
|
9260
ac8180818504
commit https://github.com/vim/vim/commit/1610d052413e0ed664498853a47acc2d677a22d1
Christian Brabandt <cb@256bit.org>
parents:
9256
diff
changeset
|
3344 TRUE, NULL); |
| 717 | 3345 do_modelines(0); |
| 634 | 3346 } |
| 2648 | 3347 |
| 3348 /* Autocommands may have changed buffer names, esp. when | |
| 3349 * 'autochdir' is set. */ | |
| 3350 fname = curbuf->b_sfname; | |
| 7 | 3351 } |
| 3352 | |
|
9469
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3353 name_was_missing = curbuf->b_ffname == NULL; |
|
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3354 |
| 7 | 3355 retval = buf_write(curbuf, ffname, fname, eap->line1, eap->line2, |
| 3356 eap, eap->append, eap->forceit, TRUE, FALSE); | |
| 634 | 3357 |
| 819 | 3358 /* After ":saveas fname" reset 'readonly'. */ |
| 961 | 3359 if (eap->cmdidx == CMD_saveas) |
| 3360 { | |
| 3361 if (retval == OK) | |
| 1806 | 3362 { |
| 961 | 3363 curbuf->b_p_ro = FALSE; |
| 1806 | 3364 redraw_tabline = TRUE; |
| 3365 } | |
|
9469
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3366 } |
|
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3367 |
|
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3368 /* Change directories when the 'acd' option is set and the file name |
|
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3369 * got changed or set. */ |
|
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3370 if (eap->cmdidx == CMD_saveas || name_was_missing) |
|
38e2fc4ee4ef
commit https://github.com/vim/vim/commit/5c71994f4ee5f87d4cce990dbc9684c70b1e108b
Christian Brabandt <cb@256bit.org>
parents:
9414
diff
changeset
|
3371 { |
|
13632
cec5137d5332
patch 8.0.1688: some macros are used without a semicolon
Christian Brabandt <cb@256bit.org>
parents:
13553
diff
changeset
|
3372 DO_AUTOCHDIR; |
| 961 | 3373 } |
| 7 | 3374 } |
| 3375 | |
| 3376 theend: | |
| 3377 #ifdef FEAT_BROWSE | |
| 3378 vim_free(browse_file); | |
| 3379 #endif | |
| 3380 vim_free(free_fname); | |
| 3381 return retval; | |
| 3382 } | |
| 3383 | |
| 3384 /* | |
| 3385 * Check if it is allowed to overwrite a file. If b_flags has BF_NOTEDITED, | |
| 3386 * BF_NEW or BF_READERR, check for overwriting current file. | |
| 3387 * May set eap->forceit if a dialog says it's OK to overwrite. | |
| 3388 * Return OK if it's OK, FAIL if it is not. | |
| 3389 */ | |
| 3486 | 3390 int |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3391 check_overwrite( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3392 exarg_T *eap, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3393 buf_T *buf, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3394 char_u *fname, /* file name to be used (can differ from |
| 7 | 3395 buf->ffname) */ |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3396 char_u *ffname, /* full path version of fname */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3397 int other) /* writing under other name */ |
| 7 | 3398 { |
| 3399 /* | |
| 3400 * write to other file or b_flags set or not writing the whole file: | |
| 3401 * overwriting only allowed with '!' | |
| 3402 */ | |
| 3403 if ( (other | |
| 3404 || (buf->b_flags & BF_NOTEDITED) | |
| 3405 || ((buf->b_flags & BF_NEW) | |
| 3406 && vim_strchr(p_cpo, CPO_OVERNEW) == NULL) | |
| 3407 || (buf->b_flags & BF_READERR)) | |
| 3408 && !p_wa | |
| 1457 | 3409 #ifdef FEAT_QUICKFIX |
| 3410 && !bt_nofile(buf) | |
| 3411 #endif | |
| 7 | 3412 && vim_fexists(ffname)) |
| 3413 { | |
| 460 | 3414 if (!eap->forceit && !eap->append) |
| 7 | 3415 { |
| 460 | 3416 #ifdef UNIX |
| 637 | 3417 /* with UNIX it is possible to open a directory */ |
| 460 | 3418 if (mch_isdir(ffname)) |
| 3419 { | |
| 3420 EMSG2(_(e_isadir2), ffname); | |
| 3421 return FAIL; | |
| 3422 } | |
| 7 | 3423 #endif |
| 3424 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG) | |
| 460 | 3425 if (p_confirm || cmdmod.confirm) |
| 3426 { | |
| 2770 | 3427 char_u buff[DIALOG_MSG_SIZE]; |
| 460 | 3428 |
| 3429 dialog_msg(buff, _("Overwrite existing file \"%s\"?"), fname); | |
| 3430 if (vim_dialog_yesno(VIM_QUESTION, NULL, buff, 2) != VIM_YES) | |
| 3431 return FAIL; | |
| 3432 eap->forceit = TRUE; | |
| 3433 } | |
| 3434 else | |
| 3435 #endif | |
| 3436 { | |
| 3437 EMSG(_(e_exists)); | |
| 7 | 3438 return FAIL; |
| 460 | 3439 } |
| 7 | 3440 } |
| 460 | 3441 |
| 3442 /* For ":w! filename" check that no swap file exists for "filename". */ | |
| 3443 if (other && !emsg_silent) | |
| 7 | 3444 { |
| 2770 | 3445 char_u *dir; |
| 460 | 3446 char_u *p; |
| 3447 int r; | |
| 3448 char_u *swapname; | |
| 3449 | |
| 3450 /* We only try the first entry in 'directory', without checking if | |
| 3451 * it's writable. If the "." directory is not writable the write | |
| 3452 * will probably fail anyway. | |
| 3453 * Use 'shortname' of the current buffer, since there is no buffer | |
| 3454 * for the written file. */ | |
| 3455 if (*p_dir == NUL) | |
| 2770 | 3456 { |
| 3457 dir = alloc(5); | |
| 3458 if (dir == NULL) | |
| 3459 return FAIL; | |
| 460 | 3460 STRCPY(dir, "."); |
| 2770 | 3461 } |
| 460 | 3462 else |
| 3463 { | |
| 2770 | 3464 dir = alloc(MAXPATHL); |
| 3465 if (dir == NULL) | |
| 3466 return FAIL; | |
| 460 | 3467 p = p_dir; |
| 3468 copy_option_part(&p, dir, MAXPATHL, ","); | |
| 3469 } | |
| 3470 swapname = makeswapname(fname, ffname, curbuf, dir); | |
| 2770 | 3471 vim_free(dir); |
| 460 | 3472 r = vim_fexists(swapname); |
| 3473 if (r) | |
| 3474 { | |
| 3475 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG) | |
| 3476 if (p_confirm || cmdmod.confirm) | |
| 3477 { | |
| 2770 | 3478 char_u buff[DIALOG_MSG_SIZE]; |
| 460 | 3479 |
| 3480 dialog_msg(buff, | |
| 3481 _("Swap file \"%s\" exists, overwrite anyway?"), | |
| 3482 swapname); | |
| 3483 if (vim_dialog_yesno(VIM_QUESTION, NULL, buff, 2) | |
| 3484 != VIM_YES) | |
| 819 | 3485 { |
| 3486 vim_free(swapname); | |
| 460 | 3487 return FAIL; |
| 819 | 3488 } |
| 460 | 3489 eap->forceit = TRUE; |
| 3490 } | |
| 3491 else | |
| 3492 #endif | |
| 3493 { | |
| 3494 EMSG2(_("E768: Swap file exists: %s (:silent! overrides)"), | |
| 3495 swapname); | |
| 819 | 3496 vim_free(swapname); |
| 460 | 3497 return FAIL; |
| 3498 } | |
| 3499 } | |
| 819 | 3500 vim_free(swapname); |
| 7 | 3501 } |
| 3502 } | |
| 3503 return OK; | |
| 3504 } | |
| 3505 | |
| 3506 /* | |
| 3507 * Handle ":wnext", ":wNext" and ":wprevious" commands. | |
| 3508 */ | |
| 3509 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3510 ex_wnext(exarg_T *eap) |
| 7 | 3511 { |
| 3512 int i; | |
| 3513 | |
| 3514 if (eap->cmd[1] == 'n') | |
| 3515 i = curwin->w_arg_idx + (int)eap->line2; | |
| 3516 else | |
| 3517 i = curwin->w_arg_idx - (int)eap->line2; | |
| 3518 eap->line1 = 1; | |
| 3519 eap->line2 = curbuf->b_ml.ml_line_count; | |
| 3520 if (do_write(eap) != FAIL) | |
| 3521 do_argfile(eap, i); | |
| 3522 } | |
| 3523 | |
| 3524 /* | |
| 3525 * ":wall", ":wqall" and ":xall": Write all changed files (and exit). | |
| 3526 */ | |
| 3527 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3528 do_wqall(exarg_T *eap) |
| 7 | 3529 { |
| 3530 buf_T *buf; | |
| 3531 int error = 0; | |
| 3532 int save_forceit = eap->forceit; | |
| 3533 | |
| 3534 if (eap->cmdidx == CMD_xall || eap->cmdidx == CMD_wqall) | |
| 3535 exiting = TRUE; | |
| 3536 | |
|
9649
fd9727ae3c49
commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
3537 FOR_ALL_BUFFERS(buf) |
| 7 | 3538 { |
|
13302
b5806be0b36d
patch 8.0.1525: using :wqa exits even if a job runs in a terminal window
Christian Brabandt <cb@256bit.org>
parents:
13276
diff
changeset
|
3539 #ifdef FEAT_TERMINAL |
|
b5806be0b36d
patch 8.0.1525: using :wqa exits even if a job runs in a terminal window
Christian Brabandt <cb@256bit.org>
parents:
13276
diff
changeset
|
3540 if (exiting && term_job_running(buf->b_term)) |
|
b5806be0b36d
patch 8.0.1525: using :wqa exits even if a job runs in a terminal window
Christian Brabandt <cb@256bit.org>
parents:
13276
diff
changeset
|
3541 { |
|
b5806be0b36d
patch 8.0.1525: using :wqa exits even if a job runs in a terminal window
Christian Brabandt <cb@256bit.org>
parents:
13276
diff
changeset
|
3542 no_write_message_nobang(buf); |
|
b5806be0b36d
patch 8.0.1525: using :wqa exits even if a job runs in a terminal window
Christian Brabandt <cb@256bit.org>
parents:
13276
diff
changeset
|
3543 ++error; |
|
b5806be0b36d
patch 8.0.1525: using :wqa exits even if a job runs in a terminal window
Christian Brabandt <cb@256bit.org>
parents:
13276
diff
changeset
|
3544 } |
|
b5806be0b36d
patch 8.0.1525: using :wqa exits even if a job runs in a terminal window
Christian Brabandt <cb@256bit.org>
parents:
13276
diff
changeset
|
3545 else |
|
b5806be0b36d
patch 8.0.1525: using :wqa exits even if a job runs in a terminal window
Christian Brabandt <cb@256bit.org>
parents:
13276
diff
changeset
|
3546 #endif |
|
12648
cdfd6eb8bb80
patch 8.0.1202: :wall gives an errof for a terminal window
Christian Brabandt <cb@256bit.org>
parents:
12515
diff
changeset
|
3547 if (bufIsChanged(buf) && !bt_dontwrite(buf)) |
| 7 | 3548 { |
| 3549 /* | |
| 3550 * Check if there is a reason the buffer cannot be written: | |
| 3551 * 1. if the 'write' option is set | |
| 3552 * 2. if there is no file name (even after browsing) | |
| 3553 * 3. if the 'readonly' is set (even after a dialog) | |
| 3554 * 4. if overwriting is allowed (even after a dialog) | |
| 3555 */ | |
| 3556 if (not_writing()) | |
| 3557 { | |
| 3558 ++error; | |
| 3559 break; | |
| 3560 } | |
| 3561 #ifdef FEAT_BROWSE | |
| 3562 /* ":browse wall": ask for file name if there isn't one */ | |
| 3563 if (buf->b_ffname == NULL && cmdmod.browse) | |
| 3564 browse_save_fname(buf); | |
| 3565 #endif | |
| 3566 if (buf->b_ffname == NULL) | |
| 3567 { | |
| 3568 EMSGN(_("E141: No file name for buffer %ld"), (long)buf->b_fnum); | |
| 3569 ++error; | |
| 3570 } | |
| 3571 else if (check_readonly(&eap->forceit, buf) | |
| 3572 || check_overwrite(eap, buf, buf->b_fname, buf->b_ffname, | |
| 3573 FALSE) == FAIL) | |
| 3574 { | |
| 3575 ++error; | |
| 3576 } | |
| 3577 else | |
| 3578 { | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
3579 bufref_T bufref; |
|
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
3580 |
|
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
3581 set_bufref(&bufref, buf); |
| 7 | 3582 if (buf_write_all(buf, eap->forceit) == FAIL) |
| 3583 ++error; | |
| 3584 /* an autocommand may have deleted the buffer */ | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
3585 if (!bufref_valid(&bufref)) |
| 7 | 3586 buf = firstbuf; |
| 3587 } | |
| 3588 eap->forceit = save_forceit; /* check_overwrite() may set it */ | |
| 3589 } | |
| 3590 } | |
| 3591 if (exiting) | |
| 3592 { | |
| 3593 if (!error) | |
| 3594 getout(0); /* exit Vim */ | |
| 3595 not_exiting(); | |
| 3596 } | |
| 3597 } | |
| 3598 | |
| 3599 /* | |
| 3600 * Check the 'write' option. | |
| 3601 * Return TRUE and give a message when it's not st. | |
| 3602 */ | |
| 3603 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3604 not_writing(void) |
| 7 | 3605 { |
| 3606 if (p_write) | |
| 3607 return FALSE; | |
| 3608 EMSG(_("E142: File not written: Writing is disabled by 'write' option")); | |
| 3609 return TRUE; | |
| 3610 } | |
| 3611 | |
| 3612 /* | |
| 1303 | 3613 * Check if a buffer is read-only (either 'readonly' option is set or file is |
| 3614 * read-only). Ask for overruling in a dialog. Return TRUE and give an error | |
| 3615 * message when the buffer is readonly. | |
| 7 | 3616 */ |
| 3617 static int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3618 check_readonly(int *forceit, buf_T *buf) |
| 7 | 3619 { |
|
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
9377
diff
changeset
|
3620 stat_T st; |
| 1303 | 3621 |
| 3622 /* Handle a file being readonly when the 'readonly' option is set or when | |
| 3623 * the file exists and permissions are read-only. | |
| 3624 * We will send 0777 to check_file_readonly(), as the "perm" variable is | |
| 3625 * important for device checks but not here. */ | |
| 3626 if (!*forceit && (buf->b_p_ro | |
| 3627 || (mch_stat((char *)buf->b_ffname, &st) >= 0 | |
| 3628 && check_file_readonly(buf->b_ffname, 0777)))) | |
| 7 | 3629 { |
| 3630 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG) | |
| 3631 if ((p_confirm || cmdmod.confirm) && buf->b_fname != NULL) | |
| 3632 { | |
| 2770 | 3633 char_u buff[DIALOG_MSG_SIZE]; |
| 7 | 3634 |
| 1303 | 3635 if (buf->b_p_ro) |
| 3636 dialog_msg(buff, _("'readonly' option is set for \"%s\".\nDo you wish to write anyway?"), | |
| 3637 buf->b_fname); | |
| 3638 else | |
| 3639 dialog_msg(buff, _("File permissions of \"%s\" are read-only.\nIt may still be possible to write it.\nDo you wish to try?"), | |
| 7 | 3640 buf->b_fname); |
| 3641 | |
| 3642 if (vim_dialog_yesno(VIM_QUESTION, NULL, buff, 2) == VIM_YES) | |
| 3643 { | |
| 3644 /* Set forceit, to force the writing of a readonly file */ | |
| 3645 *forceit = TRUE; | |
| 3646 return FALSE; | |
| 3647 } | |
| 3648 else | |
| 3649 return TRUE; | |
| 3650 } | |
| 3651 else | |
| 3652 #endif | |
| 1303 | 3653 if (buf->b_p_ro) |
| 7 | 3654 EMSG(_(e_readonly)); |
| 1303 | 3655 else |
| 3656 EMSG2(_("E505: \"%s\" is read-only (add ! to override)"), | |
| 3657 buf->b_fname); | |
| 7 | 3658 return TRUE; |
| 3659 } | |
| 1303 | 3660 |
| 7 | 3661 return FALSE; |
| 3662 } | |
| 3663 | |
| 3664 /* | |
|
14917
6f2ce3b311de
patch 8.1.0470: pointer ownership around fname_expand() is unclear
Bram Moolenaar <Bram@vim.org>
parents:
14913
diff
changeset
|
3665 * Try to abandon the current file and edit a new or existing file. |
|
6f2ce3b311de
patch 8.1.0470: pointer ownership around fname_expand() is unclear
Bram Moolenaar <Bram@vim.org>
parents:
14913
diff
changeset
|
3666 * "fnum" is the number of the file, if zero use "ffname_arg"/"sfname_arg". |
|
11476
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3667 * "lnum" is the line number for the cursor in the new file (if non-zero). |
| 7 | 3668 * |
|
11476
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3669 * Return: |
|
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3670 * GETFILE_ERROR for "normal" error, |
|
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3671 * GETFILE_NOT_WRITTEN for "not written" error, |
|
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3672 * GETFILE_SAME_FILE for success |
|
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3673 * GETFILE_OPEN_OTHER for successfully opening another file. |
| 7 | 3674 */ |
| 3675 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3676 getfile( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3677 int fnum, |
|
14917
6f2ce3b311de
patch 8.1.0470: pointer ownership around fname_expand() is unclear
Bram Moolenaar <Bram@vim.org>
parents:
14913
diff
changeset
|
3678 char_u *ffname_arg, |
|
6f2ce3b311de
patch 8.1.0470: pointer ownership around fname_expand() is unclear
Bram Moolenaar <Bram@vim.org>
parents:
14913
diff
changeset
|
3679 char_u *sfname_arg, |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3680 int setpm, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3681 linenr_T lnum, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3682 int forceit) |
| 7 | 3683 { |
|
14917
6f2ce3b311de
patch 8.1.0470: pointer ownership around fname_expand() is unclear
Bram Moolenaar <Bram@vim.org>
parents:
14913
diff
changeset
|
3684 char_u *ffname = ffname_arg; |
|
6f2ce3b311de
patch 8.1.0470: pointer ownership around fname_expand() is unclear
Bram Moolenaar <Bram@vim.org>
parents:
14913
diff
changeset
|
3685 char_u *sfname = sfname_arg; |
| 7 | 3686 int other; |
| 3687 int retval; | |
| 3688 char_u *free_me = NULL; | |
| 3689 | |
| 634 | 3690 if (text_locked()) |
|
11476
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3691 return GETFILE_ERROR; |
| 819 | 3692 if (curbuf_locked()) |
|
11476
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3693 return GETFILE_ERROR; |
| 7 | 3694 |
| 3695 if (fnum == 0) | |
| 3696 { | |
| 3697 /* make ffname full path, set sfname */ | |
| 3698 fname_expand(curbuf, &ffname, &sfname); | |
| 3699 other = otherfile(ffname); | |
| 3700 free_me = ffname; /* has been allocated, free() later */ | |
| 3701 } | |
| 3702 else | |
| 3703 other = (fnum != curbuf->b_fnum); | |
| 3704 | |
| 3705 if (other) | |
| 3706 ++no_wait_return; /* don't wait for autowrite message */ | |
|
11957
bc0fee081e1e
patch 8.0.0858: can exit while a terminal is still running a job
Christian Brabandt <cb@256bit.org>
parents:
11800
diff
changeset
|
3707 if (other && !forceit && curbuf->b_nwindows == 1 && !buf_hide(curbuf) |
| 7 | 3708 && curbufIsChanged() && autowrite(curbuf, forceit) == FAIL) |
| 3709 { | |
| 3710 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG) | |
| 3711 if (p_confirm && p_write) | |
| 3712 dialog_changed(curbuf, FALSE); | |
| 3713 if (curbufIsChanged()) | |
| 3714 #endif | |
| 3715 { | |
| 3716 if (other) | |
| 3717 --no_wait_return; | |
|
12146
59c1e09cf1a9
patch 8.0.0953: get "no write since last change" error in terminal window
Christian Brabandt <cb@256bit.org>
parents:
11957
diff
changeset
|
3718 no_write_message(); |
|
11476
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3719 retval = GETFILE_NOT_WRITTEN; /* file has been changed */ |
| 7 | 3720 goto theend; |
| 3721 } | |
| 3722 } | |
| 3723 if (other) | |
| 3724 --no_wait_return; | |
| 3725 if (setpm) | |
| 3726 setpcmark(); | |
| 3727 if (!other) | |
| 3728 { | |
| 3729 if (lnum != 0) | |
| 3730 curwin->w_cursor.lnum = lnum; | |
| 3731 check_cursor_lnum(); | |
| 3732 beginline(BL_SOL | BL_FIX); | |
|
11476
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3733 retval = GETFILE_SAME_FILE; /* it's in the same file */ |
| 7 | 3734 } |
| 3735 else if (do_ecmd(fnum, ffname, sfname, NULL, lnum, | |
|
11957
bc0fee081e1e
patch 8.0.0858: can exit while a terminal is still running a job
Christian Brabandt <cb@256bit.org>
parents:
11800
diff
changeset
|
3736 (buf_hide(curbuf) ? ECMD_HIDE : 0) + (forceit ? ECMD_FORCEIT : 0), |
| 1743 | 3737 curwin) == OK) |
|
11476
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3738 retval = GETFILE_OPEN_OTHER; /* opened another file */ |
| 7 | 3739 else |
|
11476
c45fb081391c
patch 8.0.0621: :stag does not respect 'switchbuf'
Christian Brabandt <cb@256bit.org>
parents:
11372
diff
changeset
|
3740 retval = GETFILE_ERROR; /* error encountered */ |
| 7 | 3741 |
| 3742 theend: | |
| 3743 vim_free(free_me); | |
| 3744 return retval; | |
| 3745 } | |
| 3746 | |
| 3747 /* | |
| 3748 * start editing a new file | |
| 3749 * | |
| 3750 * fnum: file number; if zero use ffname/sfname | |
| 3751 * ffname: the file name | |
| 3752 * - full path if sfname used, | |
| 3753 * - any file name if sfname is NULL | |
| 3754 * - empty string to re-edit with the same file name (but may be | |
| 3755 * in a different directory) | |
| 3756 * - NULL to start an empty buffer | |
| 3757 * sfname: the short file name (or NULL) | |
| 3758 * eap: contains the command to be executed after loading the file and | |
| 3759 * forced 'ff' and 'fenc' | |
| 3760 * newlnum: if > 0: put cursor on this line number (if possible) | |
| 3761 * if ECMD_LASTL: use last position in loaded file | |
| 3762 * if ECMD_LAST: use last position in all files | |
| 3763 * if ECMD_ONE: use first line | |
| 3764 * flags: | |
| 3765 * ECMD_HIDE: if TRUE don't free the current buffer | |
| 3766 * ECMD_SET_HELP: set b_help flag of (new) buffer before opening file | |
| 3767 * ECMD_OLDBUF: use existing buffer if it exists | |
| 3768 * ECMD_FORCEIT: ! used for Ex command | |
| 3769 * ECMD_ADDBUF: don't edit, just add to buffer list | |
| 1743 | 3770 * oldwin: Should be "curwin" when editing a new buffer in the current |
|
2311
ccda151dde4e
Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents:
2290
diff
changeset
|
3771 * window, NULL when splitting the window first. When not NULL info |
|
ccda151dde4e
Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents:
2290
diff
changeset
|
3772 * of the previous buffer for "oldwin" is stored. |
| 7 | 3773 * |
| 3774 * return FAIL for failure, OK otherwise | |
| 3775 */ | |
| 3776 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3777 do_ecmd( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3778 int fnum, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3779 char_u *ffname, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3780 char_u *sfname, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3781 exarg_T *eap, /* can be NULL! */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3782 linenr_T newlnum, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3783 int flags, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
3784 win_T *oldwin) |
| 7 | 3785 { |
| 3786 int other_file; /* TRUE if editing another file */ | |
| 3787 int oldbuf; /* TRUE if using existing buffer */ | |
| 3788 int auto_buf = FALSE; /* TRUE if autocommands brought us | |
| 3789 into the buffer unexpectedly */ | |
| 3790 char_u *new_name = NULL; | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3791 #if defined(FEAT_EVAL) |
| 716 | 3792 int did_set_swapcommand = FALSE; |
| 7 | 3793 #endif |
| 3794 buf_T *buf; | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
3795 bufref_T bufref; |
|
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9481
diff
changeset
|
3796 bufref_T old_curbuf; |
| 7 | 3797 char_u *free_fname = NULL; |
| 3798 #ifdef FEAT_BROWSE | |
| 3799 char_u *browse_file = NULL; | |
| 3800 #endif | |
| 3801 int retval = FAIL; | |
| 3802 long n; | |
| 6702 | 3803 pos_T orig_pos; |
| 7 | 3804 linenr_T topline = 0; |
| 3805 int newcol = -1; | |
| 3806 int solcol = -1; | |
| 3807 pos_T *pos; | |
| 3808 #ifdef FEAT_SUN_WORKSHOP | |
| 3809 char_u *cp; | |
| 3810 #endif | |
| 3811 char_u *command = NULL; | |
| 1185 | 3812 #ifdef FEAT_SPELL |
| 3813 int did_get_winopts = FALSE; | |
| 3814 #endif | |
|
2394
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
3815 int readfile_flags = 0; |
|
7941
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
3816 int did_inc_redrawing_disabled = FALSE; |
| 7 | 3817 |
| 3818 if (eap != NULL) | |
| 3819 command = eap->do_ecmd_cmd; | |
|
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9481
diff
changeset
|
3820 set_bufref(&old_curbuf, curbuf); |
| 7 | 3821 |
| 3822 if (fnum != 0) | |
| 3823 { | |
| 3824 if (fnum == curbuf->b_fnum) /* file is already being edited */ | |
| 3825 return OK; /* nothing to do */ | |
| 3826 other_file = TRUE; | |
| 3827 } | |
| 3828 else | |
| 3829 { | |
| 3830 #ifdef FEAT_BROWSE | |
| 3831 if (cmdmod.browse) | |
| 3832 { | |
| 462 | 3833 if ( |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3834 # ifdef FEAT_GUI |
| 462 | 3835 !gui.in_use && |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3836 # endif |
| 462 | 3837 au_has_group((char_u *)"FileExplorer")) |
| 3838 { | |
| 3839 /* No browsing supported but we do have the file explorer: | |
| 3840 * Edit the directory. */ | |
| 3841 if (ffname == NULL || !mch_isdir(ffname)) | |
| 3842 ffname = (char_u *)"."; | |
| 3843 } | |
| 3844 else | |
| 3845 { | |
| 3846 browse_file = do_browse(0, (char_u *)_("Edit File"), ffname, | |
| 7 | 3847 NULL, NULL, NULL, curbuf); |
| 462 | 3848 if (browse_file == NULL) |
| 3849 goto theend; | |
| 3850 ffname = browse_file; | |
| 3851 } | |
| 7 | 3852 } |
| 3853 #endif | |
| 3854 /* if no short name given, use ffname for short name */ | |
| 3855 if (sfname == NULL) | |
| 3856 sfname = ffname; | |
| 3857 #ifdef USE_FNAME_CASE | |
| 3858 # ifdef USE_LONG_FNAME | |
| 3859 if (USE_LONG_FNAME) | |
| 3860 # endif | |
| 436 | 3861 if (sfname != NULL) |
| 3862 fname_case(sfname, 0); /* set correct case for sfname */ | |
| 7 | 3863 #endif |
| 3864 | |
| 3865 if ((flags & ECMD_ADDBUF) && (ffname == NULL || *ffname == NUL)) | |
| 3866 goto theend; | |
| 3867 | |
| 3868 if (ffname == NULL) | |
| 3869 other_file = TRUE; | |
| 3870 /* there is no file name */ | |
| 3871 else if (*ffname == NUL && curbuf->b_ffname == NULL) | |
| 3872 other_file = FALSE; | |
| 3873 else | |
| 3874 { | |
| 3875 if (*ffname == NUL) /* re-edit with same file name */ | |
| 3876 { | |
| 3877 ffname = curbuf->b_ffname; | |
| 3878 sfname = curbuf->b_fname; | |
| 3879 } | |
| 3880 free_fname = fix_fname(ffname); /* may expand to full path name */ | |
| 3881 if (free_fname != NULL) | |
| 3882 ffname = free_fname; | |
| 3883 other_file = otherfile(ffname); | |
| 3884 #ifdef FEAT_SUN_WORKSHOP | |
| 3885 if (usingSunWorkShop && p_acd | |
| 3886 && (cp = vim_strrchr(sfname, '/')) != NULL) | |
| 3887 sfname = ++cp; | |
| 3888 #endif | |
| 3889 } | |
| 3890 } | |
| 3891 | |
| 3892 /* | |
| 3893 * if the file was changed we may not be allowed to abandon it | |
| 3894 * - if we are going to re-edit the same file | |
| 3895 * - or if we are the only window on this file and if ECMD_HIDE is FALSE | |
| 3896 */ | |
| 3897 if ( ((!other_file && !(flags & ECMD_OLDBUF)) | |
| 3898 || (curbuf->b_nwindows == 1 | |
| 3899 && !(flags & (ECMD_HIDE | ECMD_ADDBUF)))) | |
| 5464 | 3900 && check_changed(curbuf, (p_awa ? CCGD_AW : 0) |
| 3901 | (other_file ? 0 : CCGD_MULTWIN) | |
| 3902 | ((flags & ECMD_FORCEIT) ? CCGD_FORCEIT : 0) | |
| 3903 | (eap == NULL ? 0 : CCGD_EXCMD))) | |
| 7 | 3904 { |
| 3905 if (fnum == 0 && other_file && ffname != NULL) | |
| 3906 (void)setaltfname(ffname, sfname, newlnum < 0 ? 0 : newlnum); | |
| 3907 goto theend; | |
| 3908 } | |
| 3909 | |
| 3910 /* | |
| 3911 * End Visual mode before switching to another buffer, so the text can be | |
| 3912 * copied into the GUI selection buffer. | |
| 3913 */ | |
| 3914 reset_VIsual(); | |
| 3915 | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3916 #if defined(FEAT_EVAL) |
| 716 | 3917 if ((command != NULL || newlnum > (linenr_T)0) |
| 3918 && *get_vim_var_str(VV_SWAPCOMMAND) == NUL) | |
| 3919 { | |
| 3920 int len; | |
| 3921 char_u *p; | |
| 3922 | |
| 3923 /* Set v:swapcommand for the SwapExists autocommands. */ | |
| 3924 if (command != NULL) | |
| 835 | 3925 len = (int)STRLEN(command) + 3; |
| 716 | 3926 else |
| 3927 len = 30; | |
| 3928 p = alloc((unsigned)len); | |
| 3929 if (p != NULL) | |
| 3930 { | |
| 3931 if (command != NULL) | |
| 3932 vim_snprintf((char *)p, len, ":%s\r", command); | |
| 3933 else | |
| 3934 vim_snprintf((char *)p, len, "%ldG", (long)newlnum); | |
| 3935 set_vim_var_string(VV_SWAPCOMMAND, p, -1); | |
| 3936 did_set_swapcommand = TRUE; | |
| 3937 vim_free(p); | |
| 3938 } | |
| 3939 } | |
| 3940 #endif | |
| 3941 | |
| 7 | 3942 /* |
| 3943 * If we are starting to edit another file, open a (new) buffer. | |
| 3944 * Otherwise we re-use the current buffer. | |
| 3945 */ | |
| 3946 if (other_file) | |
| 3947 { | |
| 3948 if (!(flags & ECMD_ADDBUF)) | |
| 3949 { | |
| 22 | 3950 if (!cmdmod.keepalt) |
| 3951 curwin->w_alt_fnum = curbuf->b_fnum; | |
| 1743 | 3952 if (oldwin != NULL) |
| 3953 buflist_altfpos(oldwin); | |
| 7 | 3954 } |
| 3955 | |
| 3956 if (fnum) | |
| 3957 buf = buflist_findnr(fnum); | |
| 3958 else | |
| 3959 { | |
| 3960 if (flags & ECMD_ADDBUF) | |
| 3961 { | |
| 3962 linenr_T tlnum = 1L; | |
| 3963 | |
| 3964 if (command != NULL) | |
| 3965 { | |
| 3966 tlnum = atol((char *)command); | |
| 3967 if (tlnum <= 0) | |
| 3968 tlnum = 1L; | |
| 3969 } | |
| 3970 (void)buflist_new(ffname, sfname, tlnum, BLN_LISTED); | |
| 3971 goto theend; | |
| 3972 } | |
| 3973 buf = buflist_new(ffname, sfname, 0L, | |
| 3974 BLN_CURBUF | ((flags & ECMD_SET_HELP) ? 0 : BLN_LISTED)); | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3975 |
| 5816 | 3976 /* autocommands may change curwin and curbuf */ |
| 3977 if (oldwin != NULL) | |
| 3978 oldwin = curwin; | |
|
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9481
diff
changeset
|
3979 set_bufref(&old_curbuf, curbuf); |
| 7 | 3980 } |
| 3981 if (buf == NULL) | |
| 3982 goto theend; | |
| 3983 if (buf->b_ml.ml_mfp == NULL) /* no memfile yet */ | |
| 3984 { | |
| 3985 oldbuf = FALSE; | |
| 3986 } | |
| 3987 else /* existing memfile */ | |
| 3988 { | |
| 3989 oldbuf = TRUE; | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
3990 set_bufref(&bufref, buf); |
| 7 | 3991 (void)buf_check_timestamp(buf, FALSE); |
|
10106
58e6dd1d8be3
commit https://github.com/vim/vim/commit/e0ab94e7123ca7855f45919114d948ef2bc1e8c3
Christian Brabandt <cb@256bit.org>
parents:
10082
diff
changeset
|
3992 /* Check if autocommands made the buffer invalid or changed the |
|
58e6dd1d8be3
commit https://github.com/vim/vim/commit/e0ab94e7123ca7855f45919114d948ef2bc1e8c3
Christian Brabandt <cb@256bit.org>
parents:
10082
diff
changeset
|
3993 * current buffer. */ |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
3994 if (!bufref_valid(&bufref) || curbuf != old_curbuf.br_buf) |
| 7 | 3995 goto theend; |
| 3996 #ifdef FEAT_EVAL | |
| 3997 if (aborting()) /* autocmds may abort script processing */ | |
| 3998 goto theend; | |
| 3999 #endif | |
| 4000 } | |
| 4001 | |
| 4002 /* May jump to last used line number for a loaded buffer or when asked | |
| 4003 * for explicitly */ | |
| 4004 if ((oldbuf && newlnum == ECMD_LASTL) || newlnum == ECMD_LAST) | |
| 4005 { | |
| 4006 pos = buflist_findfpos(buf); | |
| 4007 newlnum = pos->lnum; | |
| 4008 solcol = pos->col; | |
| 4009 } | |
| 4010 | |
| 4011 /* | |
| 4012 * Make the (new) buffer the one used by the current window. | |
| 4013 * If the old buffer becomes unused, free it if ECMD_HIDE is FALSE. | |
| 4014 * If the current buffer was empty and has no file name, curbuf | |
| 6639 | 4015 * is returned by buflist_new(), nothing to do here. |
| 7 | 4016 */ |
| 4017 if (buf != curbuf) | |
| 4018 { | |
| 4019 /* | |
| 4020 * Be careful: The autocommands may delete any buffer and change | |
| 4021 * the current buffer. | |
| 4022 * - If the buffer we are going to edit is deleted, give up. | |
| 4023 * - If the current buffer is deleted, prefer to load the new | |
| 4024 * buffer when loading a buffer is required. This avoids | |
| 4025 * loading another buffer which then must be closed again. | |
| 4026 * - If we ended up in the new buffer already, need to skip a few | |
| 4027 * things, set auto_buf. | |
| 4028 */ | |
| 4029 if (buf->b_fname != NULL) | |
| 4030 new_name = vim_strsave(buf->b_fname); | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4031 set_bufref(&au_new_curbuf, buf); |
| 7 | 4032 apply_autocmds(EVENT_BUFLEAVE, NULL, NULL, FALSE, curbuf); |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4033 if (!bufref_valid(&au_new_curbuf)) |
| 7 | 4034 { |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4035 /* new buffer has been deleted */ |
| 7 | 4036 delbuf_msg(new_name); /* frees new_name */ |
| 4037 goto theend; | |
| 4038 } | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4039 #ifdef FEAT_EVAL |
| 7 | 4040 if (aborting()) /* autocmds may abort script processing */ |
| 4041 { | |
| 4042 vim_free(new_name); | |
| 4043 goto theend; | |
| 4044 } | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4045 #endif |
| 7 | 4046 if (buf == curbuf) /* already in new buffer */ |
| 4047 auto_buf = TRUE; | |
| 4048 else | |
| 4049 { | |
|
10082
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4050 win_T *the_curwin = curwin; |
|
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4051 |
|
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4052 /* Set the w_closing flag to avoid that autocommands close the |
|
10106
58e6dd1d8be3
commit https://github.com/vim/vim/commit/e0ab94e7123ca7855f45919114d948ef2bc1e8c3
Christian Brabandt <cb@256bit.org>
parents:
10082
diff
changeset
|
4053 * window. And set b_locked for the same reason. */ |
|
10082
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4054 the_curwin->w_closing = TRUE; |
|
10106
58e6dd1d8be3
commit https://github.com/vim/vim/commit/e0ab94e7123ca7855f45919114d948ef2bc1e8c3
Christian Brabandt <cb@256bit.org>
parents:
10082
diff
changeset
|
4055 ++buf->b_locked; |
|
10082
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4056 |
|
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9481
diff
changeset
|
4057 if (curbuf == old_curbuf.br_buf) |
| 7 | 4058 buf_copy_options(buf, BCO_ENTER); |
| 4059 | |
|
10082
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4060 /* Close the link to the current buffer. This will set |
|
10141
b67088aae933
commit https://github.com/vim/vim/commit/aeac9006d5d14910f214f09df52c026a5936e737
Christian Brabandt <cb@256bit.org>
parents:
10106
diff
changeset
|
4061 * oldwin->w_buffer to NULL. */ |
| 825 | 4062 u_sync(FALSE); |
| 1743 | 4063 close_buffer(oldwin, curbuf, |
| 3365 | 4064 (flags & ECMD_HIDE) ? 0 : DOBUF_UNLOAD, FALSE); |
| 7 | 4065 |
|
10082
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4066 the_curwin->w_closing = FALSE; |
|
10106
58e6dd1d8be3
commit https://github.com/vim/vim/commit/e0ab94e7123ca7855f45919114d948ef2bc1e8c3
Christian Brabandt <cb@256bit.org>
parents:
10082
diff
changeset
|
4067 --buf->b_locked; |
| 3242 | 4068 |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4069 #ifdef FEAT_EVAL |
|
10082
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4070 /* autocmds may abort script processing */ |
|
7fc6103c6651
commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
4071 if (aborting() && curwin->w_buffer != NULL) |
| 7 | 4072 { |
| 4073 vim_free(new_name); | |
| 4074 goto theend; | |
| 4075 } | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4076 #endif |
| 7 | 4077 /* Be careful again, like above. */ |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4078 if (!bufref_valid(&au_new_curbuf)) |
| 7 | 4079 { |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4080 /* new buffer has been deleted */ |
| 7 | 4081 delbuf_msg(new_name); /* frees new_name */ |
| 4082 goto theend; | |
| 4083 } | |
| 4084 if (buf == curbuf) /* already in new buffer */ | |
| 4085 auto_buf = TRUE; | |
| 4086 else | |
| 4087 { | |
|
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
4088 #ifdef FEAT_SYN_HL |
|
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
4089 /* |
|
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
4090 * <VN> We could instead free the synblock |
|
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
4091 * and re-attach to buffer, perhaps. |
|
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
4092 */ |
|
11649
0f7888a5ba68
patch 8.0.0707: freeing wrong memory with certain autocommands
Christian Brabandt <cb@256bit.org>
parents:
11589
diff
changeset
|
4093 if (curwin->w_buffer == NULL |
|
0f7888a5ba68
patch 8.0.0707: freeing wrong memory with certain autocommands
Christian Brabandt <cb@256bit.org>
parents:
11589
diff
changeset
|
4094 || curwin->w_s == &(curwin->w_buffer->b_s)) |
| 3480 | 4095 curwin->w_s = &(buf->b_s); |
|
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
4096 #endif |
| 7 | 4097 curwin->w_buffer = buf; |
| 4098 curbuf = buf; | |
| 4099 ++curbuf->b_nwindows; | |
|
5231
74d2f3188cd0
updated for version 7.4a.041
Bram Moolenaar <bram@vim.org>
parents:
4903
diff
changeset
|
4100 |
|
74d2f3188cd0
updated for version 7.4a.041
Bram Moolenaar <bram@vim.org>
parents:
4903
diff
changeset
|
4101 /* Set 'fileformat', 'binary' and 'fenc' when forced. */ |
|
74d2f3188cd0
updated for version 7.4a.041
Bram Moolenaar <bram@vim.org>
parents:
4903
diff
changeset
|
4102 if (!oldbuf && eap != NULL) |
|
74d2f3188cd0
updated for version 7.4a.041
Bram Moolenaar <bram@vim.org>
parents:
4903
diff
changeset
|
4103 { |
|
74d2f3188cd0
updated for version 7.4a.041
Bram Moolenaar <bram@vim.org>
parents:
4903
diff
changeset
|
4104 set_file_options(TRUE, eap); |
|
5242
f0361e297d9c
updated for version 7.4a.046
Bram Moolenaar <bram@vim.org>
parents:
5231
diff
changeset
|
4105 #ifdef FEAT_MBYTE |
|
5231
74d2f3188cd0
updated for version 7.4a.041
Bram Moolenaar <bram@vim.org>
parents:
4903
diff
changeset
|
4106 set_forced_fenc(eap); |
|
5242
f0361e297d9c
updated for version 7.4a.046
Bram Moolenaar <bram@vim.org>
parents:
5231
diff
changeset
|
4107 #endif |
|
5231
74d2f3188cd0
updated for version 7.4a.041
Bram Moolenaar <bram@vim.org>
parents:
4903
diff
changeset
|
4108 } |
| 7 | 4109 } |
| 4110 | |
| 4111 /* May get the window options from the last time this buffer | |
| 4112 * was in this window (or another window). If not used | |
| 4113 * before, reset the local window options to the global | |
| 4114 * values. Also restores old folding stuff. */ | |
| 1289 | 4115 get_winopts(curbuf); |
| 1185 | 4116 #ifdef FEAT_SPELL |
| 4117 did_get_winopts = TRUE; | |
| 4118 #endif | |
| 7 | 4119 } |
| 4120 vim_free(new_name); | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4121 au_new_curbuf.br_buf = NULL; |
|
9659
08df6ad72c56
commit https://github.com/vim/vim/commit/ac77aec4daea8d73468fcf4690cb4ccab1d807ed
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
4122 au_new_curbuf.br_buf_free_count = 0; |
| 7 | 4123 } |
| 4124 | |
| 4125 curwin->w_pcmark.lnum = 1; | |
| 4126 curwin->w_pcmark.col = 0; | |
| 4127 } | |
| 4128 else /* !other_file */ | |
| 4129 { | |
|
13553
04019fc3de93
patch 8.0.1650: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13384
diff
changeset
|
4130 if ((flags & ECMD_ADDBUF) || check_fname() == FAIL) |
| 7 | 4131 goto theend; |
| 6531 | 4132 |
| 7 | 4133 oldbuf = (flags & ECMD_OLDBUF); |
| 4134 } | |
| 4135 | |
|
7941
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
4136 /* Don't redraw until the cursor is in the right line, otherwise |
|
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
4137 * autocommands may cause ml_get errors. */ |
|
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
4138 ++RedrawingDisabled; |
|
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
4139 did_inc_redrawing_disabled = TRUE; |
|
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
4140 |
| 6365 | 4141 buf = curbuf; |
| 7 | 4142 if ((flags & ECMD_SET_HELP) || keep_help_flag) |
| 4143 { | |
| 6365 | 4144 prepare_help_buffer(); |
| 7 | 4145 } |
| 4146 else | |
| 4147 { | |
| 4148 /* Don't make a buffer listed if it's a help buffer. Useful when | |
| 4149 * using CTRL-O to go back to a help file. */ | |
| 4150 if (!curbuf->b_help) | |
| 4151 set_buflisted(TRUE); | |
| 4152 } | |
| 4153 | |
| 4154 /* If autocommands change buffers under our fingers, forget about | |
| 4155 * editing the file. */ | |
| 4156 if (buf != curbuf) | |
| 4157 goto theend; | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4158 #ifdef FEAT_EVAL |
| 7 | 4159 if (aborting()) /* autocmds may abort script processing */ |
| 4160 goto theend; | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4161 #endif |
| 7 | 4162 |
| 4163 /* Since we are starting to edit a file, consider the filetype to be | |
| 4164 * unset. Helps for when an autocommand changes files and expects syntax | |
| 4165 * highlighting to work in the other file. */ | |
| 4166 did_filetype = FALSE; | |
| 4167 | |
| 4168 /* | |
| 4169 * other_file oldbuf | |
| 4170 * FALSE FALSE re-edit same file, buffer is re-used | |
| 4171 * FALSE TRUE re-edit same file, nothing changes | |
| 4172 * TRUE FALSE start editing new file, new buffer | |
| 4173 * TRUE TRUE start editing in existing buffer (nothing to do) | |
| 4174 */ | |
| 4175 if (!other_file && !oldbuf) /* re-use the buffer */ | |
| 4176 { | |
| 4177 set_last_cursor(curwin); /* may set b_last_cursor */ | |
| 4178 if (newlnum == ECMD_LAST || newlnum == ECMD_LASTL) | |
| 4179 { | |
| 4180 newlnum = curwin->w_cursor.lnum; | |
| 4181 solcol = curwin->w_cursor.col; | |
| 4182 } | |
| 4183 buf = curbuf; | |
| 4184 if (buf->b_fname != NULL) | |
| 4185 new_name = vim_strsave(buf->b_fname); | |
| 4186 else | |
| 4187 new_name = NULL; | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4188 set_bufref(&bufref, buf); |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4189 |
|
2394
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4190 if (p_ur < 0 || curbuf->b_ml.ml_line_count <= p_ur) |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4191 { |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4192 /* Save all the text, so that the reload can be undone. |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4193 * Sync first so that this is a separate undo-able action. */ |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4194 u_sync(FALSE); |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4195 if (u_savecommon(0, curbuf->b_ml.ml_line_count + 1, 0, TRUE) |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4196 == FAIL) |
|
9705
8c0871098dc9
commit https://github.com/vim/vim/commit/1e2258297bb31720bfbeb234f2dae4d1b3b04fbd
Christian Brabandt <cb@256bit.org>
parents:
9676
diff
changeset
|
4197 { |
|
8c0871098dc9
commit https://github.com/vim/vim/commit/1e2258297bb31720bfbeb234f2dae4d1b3b04fbd
Christian Brabandt <cb@256bit.org>
parents:
9676
diff
changeset
|
4198 vim_free(new_name); |
|
2394
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4199 goto theend; |
|
9705
8c0871098dc9
commit https://github.com/vim/vim/commit/1e2258297bb31720bfbeb234f2dae4d1b3b04fbd
Christian Brabandt <cb@256bit.org>
parents:
9676
diff
changeset
|
4200 } |
|
2394
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4201 u_unchanged(curbuf); |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4202 buf_freeall(curbuf, BFA_KEEP_UNDO); |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4203 |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4204 /* tell readfile() not to clear or reload undo info */ |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4205 readfile_flags = READ_KEEP_UNDO; |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4206 } |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4207 else |
|
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4208 buf_freeall(curbuf, 0); /* free all things for buffer */ |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4209 |
| 7 | 4210 /* If autocommands deleted the buffer we were going to re-edit, give |
| 4211 * up and jump to the end. */ | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4212 if (!bufref_valid(&bufref)) |
| 7 | 4213 { |
| 4214 delbuf_msg(new_name); /* frees new_name */ | |
| 4215 goto theend; | |
| 4216 } | |
| 4217 vim_free(new_name); | |
| 4218 | |
| 4219 /* If autocommands change buffers under our fingers, forget about | |
| 4220 * re-editing the file. Should do the buf_clear_file(), but perhaps | |
| 4221 * the autocommands changed the buffer... */ | |
| 4222 if (buf != curbuf) | |
| 4223 goto theend; | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4224 #ifdef FEAT_EVAL |
| 7 | 4225 if (aborting()) /* autocmds may abort script processing */ |
| 4226 goto theend; | |
| 4227 #endif | |
| 4228 buf_clear_file(curbuf); | |
| 4229 curbuf->b_op_start.lnum = 0; /* clear '[ and '] marks */ | |
| 4230 curbuf->b_op_end.lnum = 0; | |
| 4231 } | |
| 4232 | |
| 4233 /* | |
| 4234 * If we get here we are sure to start editing | |
| 4235 */ | |
| 4236 /* Assume success now */ | |
| 4237 retval = OK; | |
| 4238 | |
| 4239 /* | |
| 4240 * Check if we are editing the w_arg_idx file in the argument list. | |
| 4241 */ | |
| 4242 check_arg_idx(curwin); | |
| 4243 | |
| 4244 if (!auto_buf) | |
| 4245 { | |
| 4246 /* | |
| 4247 * Set cursor and init window before reading the file and executing | |
| 4248 * autocommands. This allows for the autocommands to position the | |
| 4249 * cursor. | |
| 4250 */ | |
| 677 | 4251 curwin_init(); |
| 7 | 4252 |
| 4253 #ifdef FEAT_FOLDING | |
| 1370 | 4254 /* It's possible that all lines in the buffer changed. Need to update |
| 4255 * automatic folding for all windows where it's used. */ | |
| 4256 { | |
| 4257 win_T *win; | |
| 4258 tabpage_T *tp; | |
| 4259 | |
| 4260 FOR_ALL_TAB_WINDOWS(tp, win) | |
| 4261 if (win->w_buffer == curbuf) | |
| 4262 foldUpdateAll(win); | |
| 4263 } | |
| 7 | 4264 #endif |
| 4265 | |
| 961 | 4266 /* Change directories when the 'acd' option is set. */ |
|
13632
cec5137d5332
patch 8.0.1688: some macros are used without a semicolon
Christian Brabandt <cb@256bit.org>
parents:
13553
diff
changeset
|
4267 DO_AUTOCHDIR; |
| 961 | 4268 |
| 7 | 4269 /* |
| 4270 * Careful: open_buffer() and apply_autocmds() may change the current | |
| 4271 * buffer and window. | |
| 4272 */ | |
| 6702 | 4273 orig_pos = curwin->w_cursor; |
| 7 | 4274 topline = curwin->w_topline; |
| 4275 if (!oldbuf) /* need to read the file */ | |
| 4276 { | |
| 580 | 4277 #if defined(HAS_SWAP_EXISTS_ACTION) |
| 7 | 4278 swap_exists_action = SEA_DIALOG; |
| 4279 #endif | |
| 4280 curbuf->b_flags |= BF_CHECK_RO; /* set/reset 'ro' flag */ | |
| 4281 | |
| 4282 /* | |
| 4283 * Open the buffer and read the file. | |
| 4284 */ | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4285 #if defined(FEAT_EVAL) |
|
2394
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4286 if (should_abort(open_buffer(FALSE, eap, readfile_flags))) |
| 7 | 4287 retval = FAIL; |
| 4288 #else | |
|
2394
a3aca345aafa
Add the 'undoreload' option to be able to undo a file reload.
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
4289 (void)open_buffer(FALSE, eap, readfile_flags); |
| 7 | 4290 #endif |
| 4291 | |
| 580 | 4292 #if defined(HAS_SWAP_EXISTS_ACTION) |
| 7 | 4293 if (swap_exists_action == SEA_QUIT) |
| 4294 retval = FAIL; | |
|
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9481
diff
changeset
|
4295 handle_swap_exists(&old_curbuf); |
| 7 | 4296 #endif |
| 4297 } | |
| 4298 else | |
| 4299 { | |
| 23 | 4300 /* Read the modelines, but only to set window-local options. Any |
| 4301 * buffer-local options have already been set and may have been | |
| 4302 * changed by the user. */ | |
| 717 | 4303 do_modelines(OPT_WINONLY); |
| 23 | 4304 |
| 7 | 4305 apply_autocmds_retval(EVENT_BUFENTER, NULL, NULL, FALSE, curbuf, |
| 4306 &retval); | |
| 4307 apply_autocmds_retval(EVENT_BUFWINENTER, NULL, NULL, FALSE, curbuf, | |
| 4308 &retval); | |
| 4309 } | |
| 4310 check_arg_idx(curwin); | |
| 4311 | |
| 6702 | 4312 /* If autocommands change the cursor position or topline, we should |
|
14033
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4313 * keep it. Also when it moves within a line. But not when it moves |
|
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4314 * to the first non-blank. */ |
|
11121
778c10516955
patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
10970
diff
changeset
|
4315 if (!EQUAL_POS(curwin->w_cursor, orig_pos)) |
| 7 | 4316 { |
|
14033
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4317 char_u *text = ml_get_curline(); |
|
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4318 |
|
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4319 if (curwin->w_cursor.lnum != orig_pos.lnum |
|
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4320 || curwin->w_cursor.col != (int)(skipwhite(text) - text)) |
|
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4321 { |
|
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4322 newlnum = curwin->w_cursor.lnum; |
|
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4323 newcol = curwin->w_cursor.col; |
|
bcda3b864c31
patch 8.1.0034: cursor not restored with ":edit #"
Christian Brabandt <cb@256bit.org>
parents:
13632
diff
changeset
|
4324 } |
| 7 | 4325 } |
| 4326 if (curwin->w_topline == topline) | |
| 4327 topline = 0; | |
| 4328 | |
| 4329 /* Even when cursor didn't move we need to recompute topline. */ | |
| 4330 changed_line_abv_curs(); | |
| 4331 | |
| 4332 #ifdef FEAT_TITLE | |
| 4333 maketitle(); | |
| 4334 #endif | |
| 4335 } | |
| 4336 | |
| 4337 #ifdef FEAT_DIFF | |
| 4338 /* Tell the diff stuff that this buffer is new and/or needs updating. | |
| 4339 * Also needed when re-editing the same buffer, because unloading will | |
| 4340 * have removed it as a diff buffer. */ | |
| 673 | 4341 if (curwin->w_p_diff) |
| 4342 { | |
| 4343 diff_buf_add(curbuf); | |
| 4344 diff_invalidate(curbuf); | |
| 4345 } | |
| 7 | 4346 #endif |
| 4347 | |
| 1185 | 4348 #ifdef FEAT_SPELL |
| 4349 /* If the window options were changed may need to set the spell language. | |
| 4350 * Can only do this after the buffer has been properly setup. */ | |
|
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
4351 if (did_get_winopts && curwin->w_p_spell && *curwin->w_s->b_p_spl != NUL) |
|
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
4352 (void)did_set_spelllang(curwin); |
| 1185 | 4353 #endif |
| 4354 | |
| 7 | 4355 if (command == NULL) |
| 4356 { | |
| 4357 if (newcol >= 0) /* position set by autocommands */ | |
| 4358 { | |
| 4359 curwin->w_cursor.lnum = newlnum; | |
| 4360 curwin->w_cursor.col = newcol; | |
| 4361 check_cursor(); | |
| 4362 } | |
| 4363 else if (newlnum > 0) /* line number from caller or old position */ | |
| 4364 { | |
| 4365 curwin->w_cursor.lnum = newlnum; | |
| 4366 check_cursor_lnum(); | |
| 4367 if (solcol >= 0 && !p_sol) | |
| 4368 { | |
| 4369 /* 'sol' is off: Use last known column. */ | |
| 4370 curwin->w_cursor.col = solcol; | |
| 4371 check_cursor_col(); | |
| 4372 #ifdef FEAT_VIRTUALEDIT | |
| 4373 curwin->w_cursor.coladd = 0; | |
| 4374 #endif | |
| 4375 curwin->w_set_curswant = TRUE; | |
| 4376 } | |
| 4377 else | |
| 4378 beginline(BL_SOL | BL_FIX); | |
| 4379 } | |
| 4380 else /* no line number, go to last line in Ex mode */ | |
| 4381 { | |
| 4382 if (exmode_active) | |
| 4383 curwin->w_cursor.lnum = curbuf->b_ml.ml_line_count; | |
| 4384 beginline(BL_WHITE | BL_FIX); | |
| 4385 } | |
| 4386 } | |
| 4387 | |
| 4388 /* Check if cursors in other windows on the same buffer are still valid */ | |
| 4389 check_lnums(FALSE); | |
| 4390 | |
| 4391 /* | |
| 4392 * Did not read the file, need to show some info about the file. | |
| 4393 * Do this after setting the cursor. | |
| 4394 */ | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4395 if (oldbuf && !auto_buf) |
| 7 | 4396 { |
| 4397 int msg_scroll_save = msg_scroll; | |
| 4398 | |
| 4399 /* Obey the 'O' flag in 'cpoptions': overwrite any previous file | |
| 4400 * message. */ | |
| 4401 if (shortmess(SHM_OVERALL) && !exiting && p_verbose == 0) | |
| 4402 msg_scroll = FALSE; | |
| 4403 if (!msg_scroll) /* wait a bit when overwriting an error msg */ | |
| 4404 check_for_delay(FALSE); | |
| 4405 msg_start(); | |
| 4406 msg_scroll = msg_scroll_save; | |
| 4407 msg_scrolled_ign = TRUE; | |
| 4408 | |
|
8560
f3c636c673f7
commit https://github.com/vim/vim/commit/426dd0219512af5f4abeb0901b533159253ffba3
Christian Brabandt <cb@256bit.org>
parents:
8556
diff
changeset
|
4409 if (!shortmess(SHM_FILEINFO)) |
|
f3c636c673f7
commit https://github.com/vim/vim/commit/426dd0219512af5f4abeb0901b533159253ffba3
Christian Brabandt <cb@256bit.org>
parents:
8556
diff
changeset
|
4410 fileinfo(FALSE, TRUE, FALSE); |
| 7 | 4411 |
| 4412 msg_scrolled_ign = FALSE; | |
| 4413 } | |
| 4414 | |
|
9414
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
4415 #ifdef FEAT_VIMINFO |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
4416 curbuf->b_last_used = vim_time(); |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
4417 #endif |
|
1003973c99df
commit https://github.com/vim/vim/commit/ab9c89b68dcbdb3fbda8c5a50dd90caca64f1bfd
Christian Brabandt <cb@256bit.org>
parents:
9412
diff
changeset
|
4418 |
| 7 | 4419 if (command != NULL) |
| 4420 do_cmdline(command, NULL, NULL, DOCMD_VERBOSE); | |
| 4421 | |
| 4422 #ifdef FEAT_KEYMAP | |
| 4423 if (curbuf->b_kmap_state & KEYMAP_INIT) | |
| 1869 | 4424 (void)keymap_init(); |
| 7 | 4425 #endif |
| 4426 | |
| 4427 --RedrawingDisabled; | |
|
7941
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
4428 did_inc_redrawing_disabled = FALSE; |
| 7 | 4429 if (!skip_redraw) |
| 4430 { | |
| 4431 n = p_so; | |
| 4432 if (topline == 0 && command == NULL) | |
| 4433 p_so = 999; /* force cursor halfway the window */ | |
| 4434 update_topline(); | |
| 4435 curwin->w_scbind_pos = curwin->w_topline; | |
| 4436 p_so = n; | |
| 4437 redraw_curbuf_later(NOT_VALID); /* redraw this buffer later */ | |
| 4438 } | |
| 4439 | |
| 4440 if (p_im) | |
| 4441 need_start_insertmode = TRUE; | |
| 4442 | |
|
13174
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4443 #ifdef FEAT_AUTOCHDIR |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4444 /* Change directories when the 'acd' option is set and we aren't already in |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4445 * that directory (should already be done above). Expect getcwd() to be |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4446 * faster than calling shorten_fnames() unnecessarily. */ |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4447 if (p_acd && curbuf->b_ffname != NULL) |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4448 { |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4449 char_u curdir[MAXPATHL]; |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4450 char_u filedir[MAXPATHL]; |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4451 |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4452 vim_strncpy(filedir, curbuf->b_ffname, MAXPATHL - 1); |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4453 *gettail_sep(filedir) = NUL; |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4454 if (mch_dirname(curdir, MAXPATHL) != FAIL |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4455 && vim_fnamecmp(curdir, filedir) != 0) |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4456 do_autochdir(); |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4457 } |
|
1bf3519889d3
patch 8.0.1461: missing another file in patch
Christian Brabandt <cb@256bit.org>
parents:
13014
diff
changeset
|
4458 #endif |
| 821 | 4459 |
| 4460 #if defined(FEAT_SUN_WORKSHOP) || defined(FEAT_NETBEANS_INTG) | |
|
2209
d0ddf7ba1630
Included the patch to support netbeans in a terminal.
Bram Moolenaar <bram@vim.org>
parents:
2178
diff
changeset
|
4461 if (curbuf->b_ffname != NULL) |
| 7 | 4462 { |
| 4463 # ifdef FEAT_SUN_WORKSHOP | |
|
2209
d0ddf7ba1630
Included the patch to support netbeans in a terminal.
Bram Moolenaar <bram@vim.org>
parents:
2178
diff
changeset
|
4464 if (gui.in_use && usingSunWorkShop) |
| 7 | 4465 workshop_file_opened((char *)curbuf->b_ffname, curbuf->b_p_ro); |
| 4466 # endif | |
| 4467 # ifdef FEAT_NETBEANS_INTG | |
| 2210 | 4468 if ((flags & ECMD_SET_HELP) != ECMD_SET_HELP) |
| 34 | 4469 netbeans_file_opened(curbuf); |
| 7 | 4470 # endif |
| 4471 } | |
| 4472 #endif | |
| 4473 | |
| 4474 theend: | |
|
7941
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
4475 if (did_inc_redrawing_disabled) |
|
98644de08f15
commit https://github.com/vim/vim/commit/ab9fc7e0cf22bcee119b62d3433cac60f405e645
Christian Brabandt <cb@256bit.org>
parents:
7850
diff
changeset
|
4476 --RedrawingDisabled; |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
4477 #if defined(FEAT_EVAL) |
| 716 | 4478 if (did_set_swapcommand) |
| 4479 set_vim_var_string(VV_SWAPCOMMAND, NULL, -1); | |
| 4480 #endif | |
| 7 | 4481 #ifdef FEAT_BROWSE |
| 4482 vim_free(browse_file); | |
| 4483 #endif | |
| 4484 vim_free(free_fname); | |
| 4485 return retval; | |
| 4486 } | |
| 4487 | |
| 4488 static void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
4489 delbuf_msg(char_u *name) |
| 7 | 4490 { |
| 4491 EMSG2(_("E143: Autocommands unexpectedly deleted new buffer %s"), | |
| 4492 name == NULL ? (char_u *)"" : name); | |
| 4493 vim_free(name); | |
|
9481
7520696c14b0
commit https://github.com/vim/vim/commit/19ff9bf454b7492be64dd87aaf0830fa7961871e
Christian Brabandt <cb@256bit.org>
parents:
9469
diff
changeset
|
4494 au_new_curbuf.br_buf = NULL; |
|
9659
08df6ad72c56
commit https://github.com/vim/vim/commit/ac77aec4daea8d73468fcf4690cb4ccab1d807ed
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
4495 au_new_curbuf.br_buf_free_count = 0; |
| 7 | 4496 } |
| 4497 | |
| 169 | 4498 static int append_indent = 0; /* autoindent for first line */ |
| 4499 | |
| 7 | 4500 /* |
| 4501 * ":insert" and ":append", also used by ":change" | |
| 4502 */ | |
| 4503 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
4504 ex_append(exarg_T *eap) |
| 7 | 4505 { |
| 4506 char_u *theline; | |
| 4507 int did_undo = FALSE; | |
| 4508 linenr_T lnum = eap->line2; | |
| 165 | 4509 int indent = 0; |
| 4510 char_u *p; | |
| 4511 int vcol; | |
| 4512 int empty = (curbuf->b_ml.ml_flags & ML_EMPTY); | |
| 7 | 4513 |
| 169 | 4514 /* the ! flag toggles autoindent */ |
| 4515 if (eap->forceit) | |
| 4516 curbuf->b_p_ai = !curbuf->b_p_ai; | |
| 4517 | |
| 4518 /* First autoindent comes from the line we start on */ | |
| 4519 if (eap->cmdidx != CMD_change && curbuf->b_p_ai && lnum > 0) | |
| 4520 append_indent = get_indent_lnum(lnum); | |
| 4521 | |
| 7 | 4522 if (eap->cmdidx != CMD_append) |
| 4523 --lnum; | |
| 4524 | |
|
9377
5ec4fbfe38c5
commit https://github.com/vim/vim/commit/70e136e1d86ea1d795774824c7b712245912946d
Christian Brabandt <cb@256bit.org>
parents:
9347
diff
changeset
|
4525 /* when the buffer is empty need to delete the dummy line */ |
| 165 | 4526 if (empty && lnum == 1) |
| 4527 lnum = 0; | |
| 4528 | |
| 7 | 4529 State = INSERT; /* behave like in Insert mode */ |
| 4530 if (curbuf->b_p_iminsert == B_IMODE_LMAP) | |
| 4531 State |= LANGMAP; | |
| 165 | 4532 |
| 408 | 4533 for (;;) |
| 7 | 4534 { |
| 4535 msg_scroll = TRUE; | |
| 4536 need_wait_return = FALSE; | |
| 169 | 4537 if (curbuf->b_p_ai) |
| 4538 { | |
| 4539 if (append_indent >= 0) | |
| 4540 { | |
| 4541 indent = append_indent; | |
| 4542 append_indent = -1; | |
| 4543 } | |
| 4544 else if (lnum > 0) | |
| 4545 indent = get_indent_lnum(lnum); | |
| 4546 } | |
| 4547 ex_keep_indent = FALSE; | |
| 7 | 4548 if (eap->getline == NULL) |
| 169 | 4549 { |
| 4550 /* No getline() function, use the lines that follow. This ends | |
| 4551 * when there is no more. */ | |
| 4552 if (eap->nextcmd == NULL || *eap->nextcmd == NUL) | |
| 4553 break; | |
| 4554 p = vim_strchr(eap->nextcmd, NL); | |
| 4555 if (p == NULL) | |
| 4556 p = eap->nextcmd + STRLEN(eap->nextcmd); | |
| 4557 theline = vim_strnsave(eap->nextcmd, (int)(p - eap->nextcmd)); | |
| 4558 if (*p != NUL) | |
| 4559 ++p; | |
| 4560 eap->nextcmd = p; | |
| 4561 } | |
| 7 | 4562 else |
| 6164 | 4563 { |
| 4564 int save_State = State; | |
| 4565 | |
| 4566 /* Set State to avoid the cursor shape to be set to INSERT mode | |
| 4567 * when getline() returns. */ | |
| 4568 State = CMDLINE; | |
| 7 | 4569 theline = eap->getline( |
| 4570 #ifdef FEAT_EVAL | |
| 76 | 4571 eap->cstack->cs_looplevel > 0 ? -1 : |
| 7 | 4572 #endif |
| 165 | 4573 NUL, eap->cookie, indent); |
| 6164 | 4574 State = save_State; |
| 4575 } | |
| 7 | 4576 lines_left = Rows - 1; |
| 165 | 4577 if (theline == NULL) |
| 4578 break; | |
| 4579 | |
| 169 | 4580 /* Using ^ CTRL-D in getexmodeline() makes us repeat the indent. */ |
| 4581 if (ex_keep_indent) | |
| 4582 append_indent = indent; | |
| 4583 | |
| 165 | 4584 /* Look for the "." after automatic indent. */ |
| 4585 vcol = 0; | |
| 4586 for (p = theline; indent > vcol; ++p) | |
| 4587 { | |
| 4588 if (*p == ' ') | |
| 4589 ++vcol; | |
| 4590 else if (*p == TAB) | |
| 4591 vcol += 8 - vcol % 8; | |
| 4592 else | |
| 4593 break; | |
| 4594 } | |
| 4595 if ((p[0] == '.' && p[1] == NUL) | |
| 321 | 4596 || (!did_undo && u_save(lnum, lnum + 1 + (empty ? 1 : 0)) |
| 4597 == FAIL)) | |
| 7 | 4598 { |
| 4599 vim_free(theline); | |
| 4600 break; | |
| 4601 } | |
| 4602 | |
| 169 | 4603 /* don't use autoindent if nothing was typed. */ |
| 4604 if (p[0] == NUL) | |
| 4605 theline[0] = NUL; | |
| 4606 | |
| 7 | 4607 did_undo = TRUE; |
| 4608 ml_append(lnum, theline, (colnr_T)0, FALSE); | |
|
9377
5ec4fbfe38c5
commit https://github.com/vim/vim/commit/70e136e1d86ea1d795774824c7b712245912946d
Christian Brabandt <cb@256bit.org>
parents:
9347
diff
changeset
|
4609 appended_lines_mark(lnum + (empty ? 1 : 0), 1L); |
| 7 | 4610 |
| 4611 vim_free(theline); | |
| 4612 ++lnum; | |
| 165 | 4613 |
| 4614 if (empty) | |
| 4615 { | |
| 4616 ml_delete(2L, FALSE); | |
| 4617 empty = FALSE; | |
| 4618 } | |
| 7 | 4619 } |
| 4620 State = NORMAL; | |
| 4621 | |
| 169 | 4622 if (eap->forceit) |
| 4623 curbuf->b_p_ai = !curbuf->b_p_ai; | |
| 4624 | |
| 7 | 4625 /* "start" is set to eap->line2+1 unless that position is invalid (when |
| 1227 | 4626 * eap->line2 pointed to the end of the buffer and nothing was appended) |
| 7 | 4627 * "end" is set to lnum when something has been appended, otherwise |
| 4628 * it is the same than "start" -- Acevedo */ | |
| 4629 curbuf->b_op_start.lnum = (eap->line2 < curbuf->b_ml.ml_line_count) ? | |
| 4630 eap->line2 + 1 : curbuf->b_ml.ml_line_count; | |
| 4631 if (eap->cmdidx != CMD_append) | |
| 4632 --curbuf->b_op_start.lnum; | |
| 4633 curbuf->b_op_end.lnum = (eap->line2 < lnum) | |
| 4634 ? lnum : curbuf->b_op_start.lnum; | |
| 4635 curbuf->b_op_start.col = curbuf->b_op_end.col = 0; | |
| 4636 curwin->w_cursor.lnum = lnum; | |
| 4637 check_cursor_lnum(); | |
| 4638 beginline(BL_SOL | BL_FIX); | |
| 4639 | |
| 4640 need_wait_return = FALSE; /* don't use wait_return() now */ | |
| 4641 ex_no_reprint = TRUE; | |
| 4642 } | |
| 4643 | |
| 4644 /* | |
| 4645 * ":change" | |
| 4646 */ | |
| 4647 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
4648 ex_change(exarg_T *eap) |
| 7 | 4649 { |
| 4650 linenr_T lnum; | |
| 4651 | |
| 4652 if (eap->line2 >= eap->line1 | |
| 4653 && u_save(eap->line1 - 1, eap->line2 + 1) == FAIL) | |
| 4654 return; | |
| 4655 | |
| 169 | 4656 /* the ! flag toggles autoindent */ |
| 4657 if (eap->forceit ? !curbuf->b_p_ai : curbuf->b_p_ai) | |
| 4658 append_indent = get_indent_lnum(eap->line1); | |
| 4659 | |
| 7 | 4660 for (lnum = eap->line2; lnum >= eap->line1; --lnum) |
| 4661 { | |
| 4662 if (curbuf->b_ml.ml_flags & ML_EMPTY) /* nothing to delete */ | |
| 4663 break; | |
| 4664 ml_delete(eap->line1, FALSE); | |
| 4665 } | |
| 1929 | 4666 |
| 4667 /* make sure the cursor is not beyond the end of the file now */ | |
| 4668 check_cursor_lnum(); | |
| 7 | 4669 deleted_lines_mark(eap->line1, (long)(eap->line2 - lnum)); |
| 4670 | |
| 4671 /* ":append" on the line above the deleted lines. */ | |
| 4672 eap->line2 = eap->line1; | |
| 4673 ex_append(eap); | |
| 4674 } | |
| 4675 | |
| 4676 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
4677 ex_z(exarg_T *eap) |
| 7 | 4678 { |
| 4679 char_u *x; | |
|
11303
ef32a5c74515
patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
11254
diff
changeset
|
4680 long bigness; |
| 165 | 4681 char_u *kind; |
| 7 | 4682 int minus = 0; |
| 4683 linenr_T start, end, curs, i; | |
| 4684 int j; | |
| 4685 linenr_T lnum = eap->line2; | |
| 4686 | |
| 165 | 4687 /* Vi compatible: ":z!" uses display height, without a count uses |
| 4688 * 'scroll' */ | |
| 4689 if (eap->forceit) | |
| 4690 bigness = curwin->w_height; | |
|
10357
59d01e335858
commit https://github.com/vim/vim/commit/459ca563128f2edb7e3bb190090bbb755a56dd55
Christian Brabandt <cb@256bit.org>
parents:
10299
diff
changeset
|
4691 else if (!ONE_WINDOW) |
| 5678 | 4692 bigness = curwin->w_height - 3; |
| 4693 else | |
| 165 | 4694 bigness = curwin->w_p_scr * 2; |
| 7 | 4695 if (bigness < 1) |
| 4696 bigness = 1; | |
| 4697 | |
| 4698 x = eap->arg; | |
| 165 | 4699 kind = x; |
| 4700 if (*kind == '-' || *kind == '+' || *kind == '=' | |
| 4701 || *kind == '^' || *kind == '.') | |
| 4702 ++x; | |
| 4703 while (*x == '-' || *x == '+') | |
| 7 | 4704 ++x; |
| 4705 | |
| 4706 if (*x != 0) | |
| 4707 { | |
| 4708 if (!VIM_ISDIGIT(*x)) | |
| 4709 { | |
| 4710 EMSG(_("E144: non-numeric argument to :z")); | |
| 4711 return; | |
| 4712 } | |
| 4713 else | |
| 165 | 4714 { |
|
11303
ef32a5c74515
patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
11254
diff
changeset
|
4715 bigness = atol((char *)x); |
|
ef32a5c74515
patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
11254
diff
changeset
|
4716 |
|
ef32a5c74515
patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
11254
diff
changeset
|
4717 /* bigness could be < 0 if atol(x) overflows. */ |
|
ef32a5c74515
patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
11254
diff
changeset
|
4718 if (bigness > 2 * curbuf->b_ml.ml_line_count || bigness < 0) |
|
ef32a5c74515
patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
11254
diff
changeset
|
4719 bigness = 2 * curbuf->b_ml.ml_line_count; |
|
ef32a5c74515
patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
11254
diff
changeset
|
4720 |
| 165 | 4721 p_window = bigness; |
| 169 | 4722 if (*kind == '=') |
| 4723 bigness += 2; | |
| 165 | 4724 } |
| 7 | 4725 } |
| 4726 | |
| 165 | 4727 /* the number of '-' and '+' multiplies the distance */ |
| 4728 if (*kind == '-' || *kind == '+') | |
| 4729 for (x = kind + 1; *x == *kind; ++x) | |
| 4730 ; | |
| 4731 | |
| 4732 switch (*kind) | |
| 7 | 4733 { |
| 4734 case '-': | |
| 2881 | 4735 start = lnum - bigness * (linenr_T)(x - kind) + 1; |
| 4736 end = start + bigness - 1; | |
| 165 | 4737 curs = end; |
| 7 | 4738 break; |
| 4739 | |
| 4740 case '=': | |
| 159 | 4741 start = lnum - (bigness + 1) / 2 + 1; |
| 4742 end = lnum + (bigness + 1) / 2 - 1; | |
| 7 | 4743 curs = lnum; |
| 4744 minus = 1; | |
| 4745 break; | |
| 4746 | |
| 4747 case '^': | |
| 4748 start = lnum - bigness * 2; | |
| 4749 end = lnum - bigness; | |
| 4750 curs = lnum - bigness; | |
| 4751 break; | |
| 4752 | |
| 4753 case '.': | |
| 159 | 4754 start = lnum - (bigness + 1) / 2 + 1; |
| 4755 end = lnum + (bigness + 1) / 2 - 1; | |
| 7 | 4756 curs = end; |
| 4757 break; | |
| 4758 | |
| 4759 default: /* '+' */ | |
| 4760 start = lnum; | |
| 165 | 4761 if (*kind == '+') |
| 835 | 4762 start += bigness * (linenr_T)(x - kind - 1) + 1; |
| 169 | 4763 else if (eap->addr_count == 0) |
| 4764 ++start; | |
| 4765 end = start + bigness - 1; | |
| 7 | 4766 curs = end; |
| 4767 break; | |
| 4768 } | |
| 4769 | |
| 4770 if (start < 1) | |
| 4771 start = 1; | |
| 4772 | |
| 4773 if (end > curbuf->b_ml.ml_line_count) | |
| 4774 end = curbuf->b_ml.ml_line_count; | |
| 4775 | |
| 4776 if (curs > curbuf->b_ml.ml_line_count) | |
| 4777 curs = curbuf->b_ml.ml_line_count; | |
|
11372
1074f58e1673
patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents:
11303
diff
changeset
|
4778 else if (curs < 1) |
|
1074f58e1673
patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents:
11303
diff
changeset
|
4779 curs = 1; |
| 7 | 4780 |
| 4781 for (i = start; i <= end; i++) | |
| 4782 { | |
| 4783 if (minus && i == lnum) | |
| 4784 { | |
| 4785 msg_putchar('\n'); | |
| 4786 | |
| 4787 for (j = 1; j < Columns; j++) | |
| 4788 msg_putchar('-'); | |
| 4789 } | |
| 4790 | |
| 169 | 4791 print_line(i, eap->flags & EXFLAG_NR, eap->flags & EXFLAG_LIST); |
| 7 | 4792 |
| 4793 if (minus && i == lnum) | |
| 4794 { | |
| 4795 msg_putchar('\n'); | |
| 4796 | |
| 4797 for (j = 1; j < Columns; j++) | |
| 4798 msg_putchar('-'); | |
| 4799 } | |
| 4800 } | |
| 4801 | |
|
11372
1074f58e1673
patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents:
11303
diff
changeset
|
4802 if (curwin->w_cursor.lnum != curs) |
|
1074f58e1673
patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents:
11303
diff
changeset
|
4803 { |
|
1074f58e1673
patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents:
11303
diff
changeset
|
4804 curwin->w_cursor.lnum = curs; |
|
1074f58e1673
patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents:
11303
diff
changeset
|
4805 curwin->w_cursor.col = 0; |
|
1074f58e1673
patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents:
11303
diff
changeset
|
4806 } |
| 7 | 4807 ex_no_reprint = TRUE; |
| 4808 } | |
| 4809 | |
| 4810 /* | |
| 4811 * Check if the restricted flag is set. | |
| 4812 * If so, give an error message and return TRUE. | |
| 4813 * Otherwise, return FALSE. | |
| 4814 */ | |
| 4815 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
4816 check_restricted(void) |
| 7 | 4817 { |
| 4818 if (restricted) | |
| 4819 { | |
| 4820 EMSG(_("E145: Shell commands not allowed in rvim")); | |
| 4821 return TRUE; | |
| 4822 } | |
| 4823 return FALSE; | |
| 4824 } | |
| 4825 | |
| 4826 /* | |
| 4827 * Check if the secure flag is set (.exrc or .vimrc in current directory). | |
| 4828 * If so, give an error message and return TRUE. | |
| 4829 * Otherwise, return FALSE. | |
| 4830 */ | |
| 4831 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
4832 check_secure(void) |
| 7 | 4833 { |
| 4834 if (secure) | |
| 4835 { | |
| 4836 secure = 2; | |
| 4837 EMSG(_(e_curdir)); | |
| 4838 return TRUE; | |
| 4839 } | |
| 4840 #ifdef HAVE_SANDBOX | |
| 4841 /* | |
| 4842 * In the sandbox more things are not allowed, including the things | |
| 4843 * disallowed in secure mode. | |
| 4844 */ | |
| 4845 if (sandbox != 0) | |
| 4846 { | |
| 4847 EMSG(_(e_sandbox)); | |
| 4848 return TRUE; | |
| 4849 } | |
| 4850 #endif | |
| 4851 return FALSE; | |
| 4852 } | |
| 4853 | |
| 4854 static char_u *old_sub = NULL; /* previous substitute pattern */ | |
| 4855 static int global_need_beginline; /* call beginline() after ":g" */ | |
| 4856 | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4857 /* |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4858 * Flags that are kept between calls to :substitute. |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4859 */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4860 typedef struct { |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4861 int do_all; /* do multiple substitutions per line */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4862 int do_ask; /* ask for confirmation */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4863 int do_count; /* count only */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4864 int do_error; /* if false, ignore errors */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4865 int do_print; /* print last line with subs. */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4866 int do_list; /* list last line with subs. */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4867 int do_number; /* list last line with line nr*/ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4868 int do_ic; /* ignore case flag */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4869 } subflags_T; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4870 |
| 7 | 4871 /* do_sub() |
| 4872 * | |
| 4873 * Perform a substitution from line eap->line1 to line eap->line2 using the | |
| 4874 * command pointed to by eap->arg which should be of the form: | |
| 4875 * | |
| 4876 * /pattern/substitution/{flags} | |
| 4877 * | |
| 4878 * The usual escapes are supported as described in the regexp docs. | |
| 4879 */ | |
| 4880 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
4881 do_sub(exarg_T *eap) |
| 7 | 4882 { |
| 4883 linenr_T lnum; | |
| 4884 long i = 0; | |
| 4885 regmmatch_T regmatch; | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4886 static subflags_T subflags = {FALSE, FALSE, FALSE, TRUE, FALSE, |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4887 FALSE, FALSE, 0}; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4888 #ifdef FEAT_EVAL |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4889 subflags_T subflags_save; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
4890 #endif |
| 6789 | 4891 int save_do_all; /* remember user specified 'g' flag */ |
| 4892 int save_do_ask; /* remember user specified 'c' flag */ | |
| 7 | 4893 char_u *pat = NULL, *sub = NULL; /* init for GCC */ |
| 4894 int delimiter; | |
| 4895 int sublen; | |
| 4896 int got_quit = FALSE; | |
| 4897 int got_match = FALSE; | |
| 4898 int temp; | |
| 4899 int which_pat; | |
| 4900 char_u *cmd; | |
| 4901 int save_State; | |
| 165 | 4902 linenr_T first_line = 0; /* first changed line */ |
| 4903 linenr_T last_line= 0; /* below last changed line AFTER the | |
| 7 | 4904 * change */ |
| 4905 linenr_T old_line_count = curbuf->b_ml.ml_line_count; | |
| 4906 linenr_T line2; | |
| 165 | 4907 long nmatch; /* number of lines in match */ |
| 4908 char_u *sub_firstline; /* allocated copy of first sub line */ | |
| 4909 int endcolumn = FALSE; /* cursor in last column when done */ | |
| 170 | 4910 pos_T old_cursor = curwin->w_cursor; |
|
2126
e038754d419a
updated for version 7.2.408
Bram Moolenaar <bram@zimbu.org>
parents:
1929
diff
changeset
|
4911 int start_nsubs; |
| 3736 | 4912 #ifdef FEAT_EVAL |
| 5867 | 4913 int save_ma = 0; |
| 3736 | 4914 #endif |
| 7 | 4915 |
| 4916 cmd = eap->arg; | |
| 4917 if (!global_busy) | |
| 4918 { | |
| 4919 sub_nsubs = 0; | |
| 4920 sub_nlines = 0; | |
| 4921 } | |
|
2126
e038754d419a
updated for version 7.2.408
Bram Moolenaar <bram@zimbu.org>
parents:
1929
diff
changeset
|
4922 start_nsubs = sub_nsubs; |
| 7 | 4923 |
| 4924 if (eap->cmdidx == CMD_tilde) | |
| 4925 which_pat = RE_LAST; /* use last used regexp */ | |
| 4926 else | |
| 4927 which_pat = RE_SUBST; /* use last substitute regexp */ | |
| 4928 | |
| 4929 /* new pattern and substitution */ | |
|
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11127
diff
changeset
|
4930 if (eap->cmd[0] == 's' && *cmd != NUL && !VIM_ISWHITE(*cmd) |
| 7 | 4931 && vim_strchr((char_u *)"0123456789cegriIp|\"", *cmd) == NULL) |
| 4932 { | |
| 4933 /* don't accept alphanumeric for separator */ | |
| 4934 if (isalpha(*cmd)) | |
| 4935 { | |
| 4936 EMSG(_("E146: Regular expressions can't be delimited by letters")); | |
| 4937 return; | |
| 4938 } | |
| 4939 /* | |
| 4940 * undocumented vi feature: | |
| 4941 * "\/sub/" and "\?sub?" use last used search pattern (almost like | |
| 4942 * //sub/r). "\&sub&" use last substitute pattern (like //sub/). | |
| 4943 */ | |
| 4944 if (*cmd == '\\') | |
| 4945 { | |
| 4946 ++cmd; | |
| 4947 if (vim_strchr((char_u *)"/?&", *cmd) == NULL) | |
| 4948 { | |
| 4949 EMSG(_(e_backslash)); | |
| 4950 return; | |
| 4951 } | |
| 4952 if (*cmd != '&') | |
| 4953 which_pat = RE_SEARCH; /* use last '/' pattern */ | |
| 4954 pat = (char_u *)""; /* empty search pattern */ | |
| 4955 delimiter = *cmd++; /* remember delimiter character */ | |
| 4956 } | |
| 4957 else /* find the end of the regexp */ | |
| 4958 { | |
| 1466 | 4959 #ifdef FEAT_FKMAP /* reverse the flow of the Farsi characters */ |
| 4960 if (p_altkeymap && curwin->w_p_rl) | |
| 4961 lrF_sub(cmd); | |
| 4962 #endif | |
| 7 | 4963 which_pat = RE_LAST; /* use last used regexp */ |
| 4964 delimiter = *cmd++; /* remember delimiter character */ | |
| 4965 pat = cmd; /* remember start of search pat */ | |
| 4966 cmd = skip_regexp(cmd, delimiter, p_magic, &eap->arg); | |
| 4967 if (cmd[0] == delimiter) /* end delimiter found */ | |
| 4968 *cmd++ = NUL; /* replace it with a NUL */ | |
| 4969 } | |
| 4970 | |
| 4971 /* | |
| 4972 * Small incompatibility: vi sees '\n' as end of the command, but in | |
| 4973 * Vim we want to use '\n' to find/substitute a NUL. | |
| 4974 */ | |
| 4975 sub = cmd; /* remember the start of the substitution */ | |
| 4976 | |
| 4977 while (cmd[0]) | |
| 4978 { | |
| 4979 if (cmd[0] == delimiter) /* end delimiter found */ | |
| 4980 { | |
| 4981 *cmd++ = NUL; /* replace it with a NUL */ | |
| 4982 break; | |
| 4983 } | |
| 4984 if (cmd[0] == '\\' && cmd[1] != 0) /* skip escaped characters */ | |
| 4985 ++cmd; | |
|
11127
506f5d8b7d8b
patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11123
diff
changeset
|
4986 MB_PTR_ADV(cmd); |
| 7 | 4987 } |
| 4988 | |
| 4989 if (!eap->skip) | |
| 4990 { | |
| 169 | 4991 /* In POSIX vi ":s/pat/%/" uses the previous subst. string. */ |
| 4992 if (STRCMP(sub, "%") == 0 | |
| 4993 && vim_strchr(p_cpo, CPO_SUBPERCENT) != NULL) | |
| 4994 { | |
| 4995 if (old_sub == NULL) /* there is no previous command */ | |
| 4996 { | |
| 4997 EMSG(_(e_nopresub)); | |
| 4998 return; | |
| 4999 } | |
| 5000 sub = old_sub; | |
| 5001 } | |
| 5002 else | |
| 5003 { | |
| 5004 vim_free(old_sub); | |
| 5005 old_sub = vim_strsave(sub); | |
| 5006 } | |
| 7 | 5007 } |
| 5008 } | |
| 5009 else if (!eap->skip) /* use previous pattern and substitution */ | |
| 5010 { | |
| 5011 if (old_sub == NULL) /* there is no previous command */ | |
| 5012 { | |
| 5013 EMSG(_(e_nopresub)); | |
| 5014 return; | |
| 5015 } | |
| 5016 pat = NULL; /* search_regcomp() will use previous pattern */ | |
| 5017 sub = old_sub; | |
| 163 | 5018 |
| 5019 /* Vi compatibility quirk: repeating with ":s" keeps the cursor in the | |
| 5020 * last column after using "$". */ | |
| 5021 endcolumn = (curwin->w_curswant == MAXCOL); | |
| 7 | 5022 } |
| 5023 | |
| 5776 | 5024 /* Recognize ":%s/\n//" and turn it into a join command, which is much |
| 5025 * more efficient. | |
| 5026 * TODO: find a generic solution to make line-joining operations more | |
| 5027 * efficient, avoid allocating a string that grows in size. | |
| 5028 */ | |
| 5802 | 5029 if (pat != NULL && STRCMP(pat, "\\n") == 0 |
| 5776 | 5030 && *sub == NUL |
| 5031 && (*cmd == NUL || (cmd[1] == NUL && (*cmd == 'g' || *cmd == 'l' | |
| 5032 || *cmd == 'p' || *cmd == '#')))) | |
| 5033 { | |
| 6426 | 5034 linenr_T joined_lines_count; |
| 5035 | |
| 5776 | 5036 curwin->w_cursor.lnum = eap->line1; |
| 5037 if (*cmd == 'l') | |
| 5038 eap->flags = EXFLAG_LIST; | |
| 5039 else if (*cmd == '#') | |
| 5040 eap->flags = EXFLAG_NR; | |
| 5041 else if (*cmd == 'p') | |
| 5042 eap->flags = EXFLAG_PRINT; | |
| 5043 | |
| 6426 | 5044 /* The number of lines joined is the number of lines in the range plus |
| 5045 * one. One less when the last line is included. */ | |
| 5046 joined_lines_count = eap->line2 - eap->line1 + 1; | |
| 5047 if (eap->line2 < curbuf->b_ml.ml_line_count) | |
| 5048 ++joined_lines_count; | |
| 5049 if (joined_lines_count > 1) | |
| 5050 { | |
| 5051 (void)do_join(joined_lines_count, FALSE, TRUE, FALSE, TRUE); | |
| 5052 sub_nsubs = joined_lines_count - 1; | |
| 5053 sub_nlines = 1; | |
| 5054 (void)do_sub_msg(FALSE); | |
| 5055 ex_may_print(eap); | |
| 5056 } | |
| 5057 | |
| 5058 if (!cmdmod.keeppatterns) | |
| 5059 save_re_pat(RE_SUBST, pat, p_magic); | |
| 5060 #ifdef FEAT_CMDHIST | |
| 5061 /* put pattern in history */ | |
| 5062 add_to_history(HIST_SEARCH, pat, TRUE, NUL); | |
| 5063 #endif | |
| 5064 | |
| 5776 | 5065 return; |
| 5066 } | |
| 5067 | |
| 7 | 5068 /* |
| 5069 * Find trailing options. When '&' is used, keep old options. | |
| 5070 */ | |
| 5071 if (*cmd == '&') | |
| 5072 ++cmd; | |
| 5073 else | |
| 5074 { | |
| 5075 if (!p_ed) | |
| 5076 { | |
| 5077 if (p_gd) /* default is global on */ | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5078 subflags.do_all = TRUE; |
| 7 | 5079 else |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5080 subflags.do_all = FALSE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5081 subflags.do_ask = FALSE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5082 } |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5083 subflags.do_error = TRUE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5084 subflags.do_print = FALSE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5085 subflags.do_count = FALSE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5086 subflags.do_number = FALSE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5087 subflags.do_ic = 0; |
| 7 | 5088 } |
| 5089 while (*cmd) | |
| 5090 { | |
| 5091 /* | |
| 5092 * Note that 'g' and 'c' are always inverted, also when p_ed is off. | |
| 5093 * 'r' is never inverted. | |
| 5094 */ | |
| 5095 if (*cmd == 'g') | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5096 subflags.do_all = !subflags.do_all; |
| 7 | 5097 else if (*cmd == 'c') |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5098 subflags.do_ask = !subflags.do_ask; |
| 170 | 5099 else if (*cmd == 'n') |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5100 subflags.do_count = TRUE; |
| 7 | 5101 else if (*cmd == 'e') |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5102 subflags.do_error = !subflags.do_error; |
| 7 | 5103 else if (*cmd == 'r') /* use last used regexp */ |
| 5104 which_pat = RE_LAST; | |
| 5105 else if (*cmd == 'p') | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5106 subflags.do_print = TRUE; |
| 169 | 5107 else if (*cmd == '#') |
| 5108 { | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5109 subflags.do_print = TRUE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5110 subflags.do_number = TRUE; |
| 169 | 5111 } |
| 5112 else if (*cmd == 'l') | |
| 5113 { | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5114 subflags.do_print = TRUE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5115 subflags.do_list = TRUE; |
| 169 | 5116 } |
| 7 | 5117 else if (*cmd == 'i') /* ignore case */ |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5118 subflags.do_ic = 'i'; |
| 7 | 5119 else if (*cmd == 'I') /* don't ignore case */ |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5120 subflags.do_ic = 'I'; |
| 7 | 5121 else |
| 5122 break; | |
| 5123 ++cmd; | |
| 5124 } | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5125 if (subflags.do_count) |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5126 subflags.do_ask = FALSE; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5127 |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5128 save_do_all = subflags.do_all; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5129 save_do_ask = subflags.do_ask; |
| 6789 | 5130 |
| 7 | 5131 /* |
| 5132 * check for a trailing count | |
| 5133 */ | |
| 5134 cmd = skipwhite(cmd); | |
| 5135 if (VIM_ISDIGIT(*cmd)) | |
| 5136 { | |
| 5137 i = getdigits(&cmd); | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5138 if (i <= 0 && !eap->skip && subflags.do_error) |
| 7 | 5139 { |
| 5140 EMSG(_(e_zerocount)); | |
| 5141 return; | |
| 5142 } | |
| 5143 eap->line1 = eap->line2; | |
| 5144 eap->line2 += i - 1; | |
| 5145 if (eap->line2 > curbuf->b_ml.ml_line_count) | |
| 5146 eap->line2 = curbuf->b_ml.ml_line_count; | |
| 5147 } | |
| 5148 | |
| 5149 /* | |
| 5150 * check for trailing command or garbage | |
| 5151 */ | |
| 5152 cmd = skipwhite(cmd); | |
| 5153 if (*cmd && *cmd != '"') /* if not end-of-line or comment */ | |
| 5154 { | |
| 5155 eap->nextcmd = check_nextcmd(cmd); | |
| 5156 if (eap->nextcmd == NULL) | |
| 5157 { | |
| 5158 EMSG(_(e_trailing)); | |
| 5159 return; | |
| 5160 } | |
| 5161 } | |
| 5162 | |
| 5163 if (eap->skip) /* not executing commands, only parsing */ | |
| 5164 return; | |
| 5165 | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5166 if (!subflags.do_count && !curbuf->b_p_ma) |
| 823 | 5167 { |
| 825 | 5168 /* Substitution is not allowed in non-'modifiable' buffer */ |
| 823 | 5169 EMSG(_(e_modifiable)); |
| 5170 return; | |
| 5171 } | |
| 5172 | |
| 7 | 5173 if (search_regcomp(pat, RE_SUBST, which_pat, SEARCH_HIS, ®match) == FAIL) |
| 5174 { | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5175 if (subflags.do_error) |
| 7 | 5176 EMSG(_(e_invcmd)); |
| 5177 return; | |
| 5178 } | |
| 5179 | |
| 5180 /* the 'i' or 'I' flag overrules 'ignorecase' and 'smartcase' */ | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5181 if (subflags.do_ic == 'i') |
| 7 | 5182 regmatch.rmm_ic = TRUE; |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5183 else if (subflags.do_ic == 'I') |
| 7 | 5184 regmatch.rmm_ic = FALSE; |
| 5185 | |
| 5186 sub_firstline = NULL; | |
| 5187 | |
| 5188 /* | |
| 5189 * ~ in the substitute pattern is replaced with the old pattern. | |
| 5190 * We do it here once to avoid it to be replaced over and over again. | |
| 5191 * But don't do it when it starts with "\=", then it's an expression. | |
| 5192 */ | |
| 5193 if (!(sub[0] == '\\' && sub[1] == '=')) | |
| 5194 sub = regtilde(sub, p_magic); | |
| 5195 | |
| 5196 /* | |
| 5197 * Check for a match on each line. | |
| 5198 */ | |
| 5199 line2 = eap->line2; | |
| 5200 for (lnum = eap->line1; lnum <= line2 && !(got_quit | |
|
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13359
diff
changeset
|
5201 #if defined(FEAT_EVAL) |
| 7 | 5202 || aborting() |
| 5203 #endif | |
| 5204 ); ++lnum) | |
| 5205 { | |
| 1521 | 5206 nmatch = vim_regexec_multi(®match, curwin, curbuf, lnum, |
|
11521
578df034735d
patch 8.0.0643: when a pattern search is slow Vim becomes unusable
Christian Brabandt <cb@256bit.org>
parents:
11494
diff
changeset
|
5207 (colnr_T)0, NULL, NULL); |
| 7 | 5208 if (nmatch) |
| 5209 { | |
| 5210 colnr_T copycol; | |
| 5211 colnr_T matchcol; | |
| 5212 colnr_T prev_matchcol = MAXCOL; | |
| 5213 char_u *new_end, *new_start = NULL; | |
| 5214 unsigned new_start_len = 0; | |
| 5215 char_u *p1; | |
| 5216 int did_sub = FALSE; | |
| 5217 int lastone; | |
| 1872 | 5218 int len, copy_len, needed_len; |
| 7 | 5219 long nmatch_tl = 0; /* nr of lines matched below lnum */ |
| 5220 int do_again; /* do it again after joining lines */ | |
| 15 | 5221 int skip_match = FALSE; |
| 1499 | 5222 linenr_T sub_firstlnum; /* nr of first sub line */ |
| 7 | 5223 |
| 5224 /* | |
| 5225 * The new text is build up step by step, to avoid too much | |
| 5226 * copying. There are these pieces: | |
| 1581 | 5227 * sub_firstline The old text, unmodified. |
| 7 | 5228 * copycol Column in the old text where we started |
| 5229 * looking for a match; from here old text still | |
| 5230 * needs to be copied to the new text. | |
| 5231 * matchcol Column number of the old text where to look | |
| 5232 * for the next match. It's just after the | |
| 5233 * previous match or one further. | |
| 5234 * prev_matchcol Column just after the previous match (if any). | |
| 5235 * Mostly equal to matchcol, except for the first | |
| 5236 * match and after skipping an empty match. | |
| 5237 * regmatch.*pos Where the pattern matched in the old text. | |
| 5238 * new_start The new text, all that has been produced so | |
| 5239 * far. | |
| 5240 * new_end The new text, where to append new text. | |
| 5241 * | |
| 1499 | 5242 * lnum The line number where we found the start of |
| 5243 * the match. Can be below the line we searched | |
| 5244 * when there is a \n before a \zs in the | |
| 5245 * pattern. | |
| 7 | 5246 * sub_firstlnum The line number in the buffer where to look |
| 5247 * for a match. Can be different from "lnum" | |
| 5248 * when the pattern or substitute string contains | |
| 5249 * line breaks. | |
| 5250 * | |
| 5251 * Special situations: | |
| 5252 * - When the substitute string contains a line break, the part up | |
| 5253 * to the line break is inserted in the text, but the copy of | |
| 5254 * the original line is kept. "sub_firstlnum" is adjusted for | |
| 5255 * the inserted lines. | |
| 5256 * - When the matched pattern contains a line break, the old line | |
| 5257 * is taken from the line at the end of the pattern. The lines | |
| 5258 * in the match are deleted later, "sub_firstlnum" is adjusted | |
| 5259 * accordingly. | |
| 5260 * | |
| 5261 * The new text is built up in new_start[]. It has some extra | |
| 5262 * room to avoid using alloc()/free() too often. new_start_len is | |
| 1389 | 5263 * the length of the allocated memory at new_start. |
| 7 | 5264 * |
| 5265 * Make a copy of the old line, so it won't be taken away when | |
| 5266 * updating the screen or handling a multi-line match. The "old_" | |
| 5267 * pointers point into this copy. | |
| 5268 */ | |
| 1499 | 5269 sub_firstlnum = lnum; |
| 7 | 5270 copycol = 0; |
| 5271 matchcol = 0; | |
| 5272 | |
| 5273 /* At first match, remember current cursor position. */ | |
| 5274 if (!got_match) | |
| 5275 { | |
| 5276 setpcmark(); | |
| 5277 got_match = TRUE; | |
| 5278 } | |
| 5279 | |
| 5280 /* | |
| 5281 * Loop until nothing more to replace in this line. | |
| 5282 * 1. Handle match with empty string. | |
| 5283 * 2. If do_ask is set, ask for confirmation. | |
| 5284 * 3. substitute the string. | |
| 5285 * 4. if do_all is set, find next match | |
| 5286 * 5. break if there isn't another match in this line | |
| 5287 */ | |
| 5288 for (;;) | |
| 5289 { | |
| 1499 | 5290 /* Advance "lnum" to the line where the match starts. The |
| 5291 * match does not start in the first line when there is a line | |
| 5292 * break before \zs. */ | |
| 5293 if (regmatch.startpos[0].lnum > 0) | |
| 5294 { | |
| 5295 lnum += regmatch.startpos[0].lnum; | |
| 5296 sub_firstlnum += regmatch.startpos[0].lnum; | |
| 5297 nmatch -= regmatch.startpos[0].lnum; | |
|
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13174
diff
changeset
|
5298 VIM_CLEAR(sub_firstline); |
| 1499 | 5299 } |
| 5300 | |
| 5301 if (sub_firstline == NULL) | |
| 5302 { | |
| 5303 sub_firstline = vim_strsave(ml_get(sub_firstlnum)); | |
| 5304 if (sub_firstline == NULL) | |
| 5305 { | |
| 5306 vim_free(new_start); | |
| 5307 goto outofmem; | |
| 5308 } | |
| 5309 } | |
| 5310 | |
| 7 | 5311 /* Save the line number of the last change for the final |
| 5312 * cursor position (just like Vi). */ | |
| 5313 curwin->w_cursor.lnum = lnum; | |
| 5314 do_again = FALSE; | |
| 5315 | |
| 5316 /* | |
| 5317 * 1. Match empty string does not count, except for first | |
| 5318 * match. This reproduces the strange vi behaviour. | |
| 5319 * This also catches endless loops. | |
| 5320 */ | |
| 5321 if (matchcol == prev_matchcol | |
| 5322 && regmatch.endpos[0].lnum == 0 | |
| 5323 && matchcol == regmatch.endpos[0].col) | |
| 5324 { | |
| 15 | 5325 if (sub_firstline[matchcol] == NUL) |
| 5326 /* We already were at the end of the line. Don't look | |
| 5327 * for a match in this line again. */ | |
| 5328 skip_match = TRUE; | |
| 5329 else | |
| 2837 | 5330 { |
| 5331 /* search for a match at next column */ | |
| 5332 #ifdef FEAT_MBYTE | |
| 5333 if (has_mbyte) | |
| 5334 matchcol += mb_ptr2len(sub_firstline + matchcol); | |
| 5335 else | |
| 5336 #endif | |
| 5337 ++matchcol; | |
| 5338 } | |
| 7 | 5339 goto skip; |
| 5340 } | |
| 5341 | |
| 5342 /* Normally we continue searching for a match just after the | |
| 5343 * previous match. */ | |
| 5344 matchcol = regmatch.endpos[0].col; | |
| 5345 prev_matchcol = matchcol; | |
| 5346 | |
| 5347 /* | |
| 170 | 5348 * 2. If do_count is set only increase the counter. |
| 5349 * If do_ask is set, ask for confirmation. | |
| 7 | 5350 */ |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5351 if (subflags.do_count) |
| 170 | 5352 { |
| 5353 /* For a multi-line match, put matchcol at the NUL at | |
| 5354 * the end of the line and set nmatch to one, so that | |
| 5355 * we continue looking for a match on the next line. | |
| 5356 * Avoids that ":s/\nB\@=//gc" get stuck. */ | |
| 5357 if (nmatch > 1) | |
| 5358 { | |
| 835 | 5359 matchcol = (colnr_T)STRLEN(sub_firstline); |
| 170 | 5360 nmatch = 1; |
| 1483 | 5361 skip_match = TRUE; |
| 170 | 5362 } |
| 5363 sub_nsubs++; | |
| 5364 did_sub = TRUE; | |
| 3736 | 5365 #ifdef FEAT_EVAL |
| 5366 /* Skip the substitution, unless an expression is used, | |
| 5367 * then it is evaluated in the sandbox. */ | |
| 5368 if (!(sub[0] == '\\' && sub[1] == '=')) | |
| 5369 #endif | |
| 5370 goto skip; | |
| 170 | 5371 } |
| 5372 | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5373 if (subflags.do_ask) |
| 7 | 5374 { |
| 1874 | 5375 int typed = 0; |
| 1872 | 5376 |
| 7 | 5377 /* change State to CONFIRM, so that the mouse works |
| 5378 * properly */ | |
| 5379 save_State = State; | |
| 5380 State = CONFIRM; | |
| 5381 #ifdef FEAT_MOUSE | |
| 5382 setmouse(); /* disable mouse in xterm */ | |
| 5383 #endif | |
| 5384 curwin->w_cursor.col = regmatch.startpos[0].col; | |
|
10638
21f983648487
patch 8.0.0209: cursor binding does not work with :substitute
Christian Brabandt <cb@256bit.org>
parents:
10575
diff
changeset
|
5385 if (curwin->w_p_crb) |
|
21f983648487
patch 8.0.0209: cursor binding does not work with :substitute
Christian Brabandt <cb@256bit.org>
parents:
10575
diff
changeset
|
5386 do_check_cursorbind(); |
| 7 | 5387 |
| 5388 /* When 'cpoptions' contains "u" don't sync undo when | |
| 5389 * asking for confirmation. */ | |
| 5390 if (vim_strchr(p_cpo, CPO_UNDO) != NULL) | |
| 5391 ++no_u_sync; | |
| 5392 | |
| 5393 /* | |
| 5394 * Loop until 'y', 'n', 'q', CTRL-E or CTRL-Y typed. | |
| 5395 */ | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5396 while (subflags.do_ask) |
| 7 | 5397 { |
| 169 | 5398 if (exmode_active) |
| 5399 { | |
| 5400 char_u *resp; | |
| 5401 colnr_T sc, ec; | |
| 5402 | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5403 print_line_no_prefix(lnum, |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5404 subflags.do_number, subflags.do_list); |
| 169 | 5405 |
| 5406 getvcol(curwin, &curwin->w_cursor, &sc, NULL, NULL); | |
| 5407 curwin->w_cursor.col = regmatch.endpos[0].col - 1; | |
|
10970
ab9f7bbe4439
patch 8.0.0374: invalid memory access when using :sc in Ex mode
Christian Brabandt <cb@256bit.org>
parents:
10853
diff
changeset
|
5408 if (curwin->w_cursor.col < 0) |
|
ab9f7bbe4439
patch 8.0.0374: invalid memory access when using :sc in Ex mode
Christian Brabandt <cb@256bit.org>
parents:
10853
diff
changeset
|
5409 curwin->w_cursor.col = 0; |
| 169 | 5410 getvcol(curwin, &curwin->w_cursor, NULL, NULL, &ec); |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5411 if (subflags.do_number || curwin->w_p_nu) |
| 5396 | 5412 { |
| 5413 int numw = number_width(curwin) + 1; | |
| 5414 sc += numw; | |
| 5415 ec += numw; | |
| 5416 } | |
| 169 | 5417 msg_start(); |
| 170 | 5418 for (i = 0; i < (long)sc; ++i) |
| 169 | 5419 msg_putchar(' '); |
| 170 | 5420 for ( ; i <= (long)ec; ++i) |
| 169 | 5421 msg_putchar('^'); |
| 5422 | |
| 5423 resp = getexmodeline('?', NULL, 0); | |
| 5424 if (resp != NULL) | |
| 5425 { | |
| 1872 | 5426 typed = *resp; |
| 169 | 5427 vim_free(resp); |
| 5428 } | |
| 5429 } | |
| 5430 else | |
| 5431 { | |
| 4076 | 5432 char_u *orig_line = NULL; |
| 5433 int len_change = 0; | |
| 7 | 5434 #ifdef FEAT_FOLDING |
| 169 | 5435 int save_p_fen = curwin->w_p_fen; |
| 5436 | |
| 5437 curwin->w_p_fen = FALSE; | |
| 5438 #endif | |
| 5439 /* Invert the matched string. | |
| 5440 * Remove the inversion afterwards. */ | |
| 5441 temp = RedrawingDisabled; | |
| 5442 RedrawingDisabled = 0; | |
| 5443 | |
| 4076 | 5444 if (new_start != NULL) |
| 5445 { | |
| 5446 /* There already was a substitution, we would | |
| 5447 * like to show this to the user. We cannot | |
| 5448 * really update the line, it would change | |
| 5449 * what matches. Temporarily replace the line | |
| 5450 * and change it back afterwards. */ | |
| 5451 orig_line = vim_strsave(ml_get(lnum)); | |
| 5452 if (orig_line != NULL) | |
| 5453 { | |
| 5454 char_u *new_line = concat_str(new_start, | |
| 5455 sub_firstline + copycol); | |
| 5456 | |
| 5457 if (new_line == NULL) | |
|
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13174
diff
changeset
|
5458 VIM_CLEAR(orig_line); |
| 4076 | 5459 else |
| 5460 { | |
| 5461 /* Position the cursor relative to the | |
| 5462 * end of the line, the previous | |
| 5463 * substitute may have inserted or | |
| 5464 * deleted characters before the | |
| 5465 * cursor. */ | |
| 4086 | 5466 len_change = (int)STRLEN(new_line) |
| 5467 - (int)STRLEN(orig_line); | |
| 4076 | 5468 curwin->w_cursor.col += len_change; |
| 5469 ml_replace(lnum, new_line, FALSE); | |
| 5470 } | |
| 5471 } | |
| 5472 } | |
| 5473 | |
| 1499 | 5474 search_match_lines = regmatch.endpos[0].lnum |
| 5475 - regmatch.startpos[0].lnum; | |
| 4076 | 5476 search_match_endcol = regmatch.endpos[0].col |
| 5477 + len_change; | |
| 169 | 5478 highlight_match = TRUE; |
| 5479 | |
| 5480 update_topline(); | |
| 5481 validate_cursor(); | |
| 748 | 5482 update_screen(SOME_VALID); |
| 169 | 5483 highlight_match = FALSE; |
| 748 | 5484 redraw_later(SOME_VALID); |
| 7 | 5485 |
| 5486 #ifdef FEAT_FOLDING | |
| 169 | 5487 curwin->w_p_fen = save_p_fen; |
| 5488 #endif | |
| 5489 if (msg_row == Rows - 1) | |
| 5490 msg_didout = FALSE; /* avoid a scroll-up */ | |
| 5491 msg_starthere(); | |
| 5492 i = msg_scroll; | |
| 5493 msg_scroll = 0; /* truncate msg when | |
| 5494 needed */ | |
| 5495 msg_no_more = TRUE; | |
| 5496 /* write message same highlighting as for | |
| 5497 * wait_return */ | |
|
11158
501f46f7644c
patch 8.0.0466: still macros that should be all-caps
Christian Brabandt <cb@256bit.org>
parents:
11144
diff
changeset
|
5498 smsg_attr(HL_ATTR(HLF_R), |
| 169 | 5499 (char_u *)_("replace with %s (y/n/a/q/l/^E/^Y)?"), sub); |
| 5500 msg_no_more = FALSE; | |
| 5501 msg_scroll = i; | |
| 5502 showruler(TRUE); | |
| 5503 windgoto(msg_row, msg_col); | |
| 5504 RedrawingDisabled = temp; | |
| 7 | 5505 |
| 5506 #ifdef USE_ON_FLY_SCROLL | |
| 169 | 5507 dont_scroll = FALSE; /* allow scrolling here */ |
| 5508 #endif | |
| 5509 ++no_mapping; /* don't map this key */ | |
| 5510 ++allow_keys; /* allow special keys */ | |
| 1872 | 5511 typed = plain_vgetc(); |
| 169 | 5512 --allow_keys; |
| 5513 --no_mapping; | |
| 5514 | |
| 5515 /* clear the question */ | |
| 5516 msg_didout = FALSE; /* don't scroll up */ | |
| 5517 msg_col = 0; | |
| 5518 gotocmdline(TRUE); | |
| 4076 | 5519 |
| 5520 /* restore the line */ | |
| 5521 if (orig_line != NULL) | |
| 5522 ml_replace(lnum, orig_line, FALSE); | |
| 169 | 5523 } |
| 5524 | |
| 7 | 5525 need_wait_return = FALSE; /* no hit-return prompt */ |
| 1872 | 5526 if (typed == 'q' || typed == ESC || typed == Ctrl_C |
| 7 | 5527 #ifdef UNIX |
| 1872 | 5528 || typed == intr_char |
| 7 | 5529 #endif |
| 5530 ) | |
| 5531 { | |
| 5532 got_quit = TRUE; | |
| 5533 break; | |
| 5534 } | |
| 1872 | 5535 if (typed == 'n') |
| 7 | 5536 break; |
| 1872 | 5537 if (typed == 'y') |
| 7 | 5538 break; |
| 1872 | 5539 if (typed == 'l') |
| 7 | 5540 { |
| 5541 /* last: replace and then stop */ | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5542 subflags.do_all = FALSE; |
| 7 | 5543 line2 = lnum; |
| 5544 break; | |
| 5545 } | |
| 1872 | 5546 if (typed == 'a') |
| 7 | 5547 { |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5548 subflags.do_ask = FALSE; |
| 7 | 5549 break; |
| 5550 } | |
| 5551 #ifdef FEAT_INS_EXPAND | |
| 1872 | 5552 if (typed == Ctrl_E) |
| 7 | 5553 scrollup_clamp(); |
| 1872 | 5554 else if (typed == Ctrl_Y) |
| 7 | 5555 scrolldown_clamp(); |
| 5556 #endif | |
| 5557 } | |
| 5558 State = save_State; | |
| 5559 #ifdef FEAT_MOUSE | |
| 5560 setmouse(); | |
| 5561 #endif | |
| 5562 if (vim_strchr(p_cpo, CPO_UNDO) != NULL) | |
| 5563 --no_u_sync; | |
| 5564 | |
| 1872 | 5565 if (typed == 'n') |
| 7 | 5566 { |
| 5567 /* For a multi-line match, put matchcol at the NUL at | |
| 5568 * the end of the line and set nmatch to one, so that | |
| 5569 * we continue looking for a match on the next line. | |
| 1091 | 5570 * Avoids that ":%s/\nB\@=//gc" and ":%s/\n/,\r/gc" |
| 5571 * get stuck when pressing 'n'. */ | |
| 7 | 5572 if (nmatch > 1) |
| 5573 { | |
| 835 | 5574 matchcol = (colnr_T)STRLEN(sub_firstline); |
| 1091 | 5575 skip_match = TRUE; |
| 7 | 5576 } |
| 5577 goto skip; | |
| 5578 } | |
| 5579 if (got_quit) | |
| 4099 | 5580 goto skip; |
| 7 | 5581 } |
| 5582 | |
| 5583 /* Move the cursor to the start of the match, so that we can | |
| 5584 * use "\=col("."). */ | |
| 5585 curwin->w_cursor.col = regmatch.startpos[0].col; | |
| 5586 | |
| 5587 /* | |
| 5588 * 3. substitute the string. | |
| 5589 */ | |
| 3736 | 5590 #ifdef FEAT_EVAL |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5591 if (subflags.do_count) |
| 3736 | 5592 { |
| 3786 | 5593 /* prevent accidentally changing the buffer by a function */ |
| 3736 | 5594 save_ma = curbuf->b_p_ma; |
| 5595 curbuf->b_p_ma = FALSE; | |
| 5596 sandbox++; | |
| 5597 } | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5598 /* Save flags for recursion. They can change for e.g. |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5599 * :s/^/\=execute("s#^##gn") */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5600 subflags_save = subflags; |
| 3736 | 5601 #endif |
| 7 | 5602 /* get length of substitution part */ |
| 1499 | 5603 sublen = vim_regsub_multi(®match, |
| 5604 sub_firstlnum - regmatch.startpos[0].lnum, | |
| 7 | 5605 sub, sub_firstline, FALSE, p_magic, TRUE); |
| 3736 | 5606 #ifdef FEAT_EVAL |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5607 /* Don't keep flags set by a recursive call. */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5608 subflags = subflags_save; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5609 if (subflags.do_count) |
| 3736 | 5610 { |
| 5611 curbuf->b_p_ma = save_ma; | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5612 if (sandbox > 0) |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5613 sandbox--; |
| 3736 | 5614 goto skip; |
| 5615 } | |
| 5616 #endif | |
| 7 | 5617 |
| 533 | 5618 /* When the match included the "$" of the last line it may |
| 819 | 5619 * go beyond the last line of the buffer. */ |
| 533 | 5620 if (nmatch > curbuf->b_ml.ml_line_count - sub_firstlnum + 1) |
| 5621 { | |
| 5622 nmatch = curbuf->b_ml.ml_line_count - sub_firstlnum + 1; | |
| 5623 skip_match = TRUE; | |
| 5624 } | |
| 5625 | |
| 7 | 5626 /* Need room for: |
| 5627 * - result so far in new_start (not for first sub in line) | |
| 5628 * - original text up to match | |
| 5629 * - length of substituted part | |
| 5630 * - original text after match | |
| 5631 */ | |
| 5632 if (nmatch == 1) | |
| 5633 p1 = sub_firstline; | |
| 5634 else | |
| 5635 { | |
| 5636 p1 = ml_get(sub_firstlnum + nmatch - 1); | |
| 5637 nmatch_tl += nmatch - 1; | |
| 5638 } | |
| 1872 | 5639 copy_len = regmatch.startpos[0].col - copycol; |
| 5640 needed_len = copy_len + ((unsigned)STRLEN(p1) | |
| 5641 - regmatch.endpos[0].col) + sublen + 1; | |
| 7 | 5642 if (new_start == NULL) |
| 5643 { | |
| 5644 /* | |
| 5645 * Get some space for a temporary buffer to do the | |
| 5646 * substitution into (and some extra space to avoid | |
| 5647 * too many calls to alloc()/free()). | |
| 5648 */ | |
| 5649 new_start_len = needed_len + 50; | |
| 5650 if ((new_start = alloc_check(new_start_len)) == NULL) | |
| 5651 goto outofmem; | |
| 5652 *new_start = NUL; | |
| 5653 new_end = new_start; | |
| 5654 } | |
| 5655 else | |
| 5656 { | |
| 5657 /* | |
| 5658 * Check if the temporary buffer is long enough to do the | |
| 5659 * substitution into. If not, make it larger (with a bit | |
| 5660 * extra to avoid too many calls to alloc()/free()). | |
| 5661 */ | |
| 5662 len = (unsigned)STRLEN(new_start); | |
| 5663 needed_len += len; | |
| 1872 | 5664 if (needed_len > (int)new_start_len) |
| 7 | 5665 { |
| 5666 new_start_len = needed_len + 50; | |
| 5667 if ((p1 = alloc_check(new_start_len)) == NULL) | |
| 5668 { | |
| 5669 vim_free(new_start); | |
| 5670 goto outofmem; | |
| 5671 } | |
| 5672 mch_memmove(p1, new_start, (size_t)(len + 1)); | |
| 5673 vim_free(new_start); | |
| 5674 new_start = p1; | |
| 5675 } | |
| 5676 new_end = new_start + len; | |
| 5677 } | |
| 5678 | |
| 5679 /* | |
| 5680 * copy the text up to the part that matched | |
| 5681 */ | |
| 1872 | 5682 mch_memmove(new_end, sub_firstline + copycol, (size_t)copy_len); |
| 5683 new_end += copy_len; | |
| 7 | 5684 |
| 1499 | 5685 (void)vim_regsub_multi(®match, |
| 5686 sub_firstlnum - regmatch.startpos[0].lnum, | |
| 7 | 5687 sub, new_end, TRUE, p_magic, TRUE); |
| 5688 sub_nsubs++; | |
| 5689 did_sub = TRUE; | |
| 5690 | |
| 5691 /* Move the cursor to the start of the line, to avoid that it | |
| 5692 * is beyond the end of the line after the substitution. */ | |
| 5693 curwin->w_cursor.col = 0; | |
| 5694 | |
| 5695 /* For a multi-line match, make a copy of the last matched | |
| 5696 * line and continue in that one. */ | |
| 5697 if (nmatch > 1) | |
| 5698 { | |
| 5699 sub_firstlnum += nmatch - 1; | |
| 5700 vim_free(sub_firstline); | |
| 5701 sub_firstline = vim_strsave(ml_get(sub_firstlnum)); | |
| 5702 /* When going beyond the last line, stop substituting. */ | |
| 5703 if (sub_firstlnum <= line2) | |
| 5704 do_again = TRUE; | |
| 5705 else | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5706 subflags.do_all = FALSE; |
| 7 | 5707 } |
| 5708 | |
| 5709 /* Remember next character to be copied. */ | |
| 5710 copycol = regmatch.endpos[0].col; | |
| 5711 | |
| 819 | 5712 if (skip_match) |
| 5713 { | |
| 5714 /* Already hit end of the buffer, sub_firstlnum is one | |
| 5715 * less than what it ought to be. */ | |
| 5716 vim_free(sub_firstline); | |
| 5717 sub_firstline = vim_strsave((char_u *)""); | |
| 5718 copycol = 0; | |
| 5719 } | |
| 5720 | |
| 7 | 5721 /* |
| 5722 * Now the trick is to replace CTRL-M chars with a real line | |
| 5723 * break. This would make it impossible to insert a CTRL-M in | |
| 5724 * the text. The line break can be avoided by preceding the | |
| 5725 * CTRL-M with a backslash. To be able to insert a backslash, | |
| 5726 * they must be doubled in the string and are halved here. | |
| 5727 * That is Vi compatible. | |
| 5728 */ | |
| 5729 for (p1 = new_end; *p1; ++p1) | |
| 5730 { | |
| 5731 if (p1[0] == '\\' && p1[1] != NUL) /* remove backslash */ | |
| 1624 | 5732 STRMOVE(p1, p1 + 1); |
| 7 | 5733 else if (*p1 == CAR) |
| 5734 { | |
| 5735 if (u_inssub(lnum) == OK) /* prepare for undo */ | |
| 5736 { | |
| 5737 *p1 = NUL; /* truncate up to the CR */ | |
| 5738 ml_append(lnum - 1, new_start, | |
| 5739 (colnr_T)(p1 - new_start + 1), FALSE); | |
| 5740 mark_adjust(lnum + 1, (linenr_T)MAXLNUM, 1L, 0L); | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5741 if (subflags.do_ask) |
| 7 | 5742 appended_lines(lnum - 1, 1L); |
| 5743 else | |
| 5744 { | |
| 5745 if (first_line == 0) | |
| 5746 first_line = lnum; | |
| 5747 last_line = lnum + 1; | |
| 5748 } | |
| 5749 /* All line numbers increase. */ | |
| 5750 ++sub_firstlnum; | |
| 5751 ++lnum; | |
| 5752 ++line2; | |
| 5753 /* move the cursor to the new line, like Vi */ | |
| 5754 ++curwin->w_cursor.lnum; | |
| 1444 | 5755 /* copy the rest */ |
| 1624 | 5756 STRMOVE(new_start, p1 + 1); |
| 7 | 5757 p1 = new_start - 1; |
| 5758 } | |
| 5759 } | |
| 5760 #ifdef FEAT_MBYTE | |
| 5761 else if (has_mbyte) | |
| 474 | 5762 p1 += (*mb_ptr2len)(p1) - 1; |
| 7 | 5763 #endif |
| 5764 } | |
| 5765 | |
| 5766 /* | |
| 5767 * 4. If do_all is set, find next match. | |
| 5768 * Prevent endless loop with patterns that match empty | |
| 5769 * strings, e.g. :s/$/pat/g or :s/[a-z]* /(&)/g. | |
| 5770 * But ":s/\n/#/" is OK. | |
| 5771 */ | |
| 5772 skip: | |
| 5773 /* We already know that we did the last subst when we are at | |
| 5774 * the end of the line, except that a pattern like | |
| 1499 | 5775 * "bar\|\nfoo" may match at the NUL. "lnum" can be below |
| 5776 * "line2" when there is a \zs in the pattern after a line | |
| 5777 * break. */ | |
| 15 | 5778 lastone = (skip_match |
| 5779 || got_int | |
| 5780 || got_quit | |
| 1499 | 5781 || lnum > line2 |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5782 || !(subflags.do_all || do_again) |
| 15 | 5783 || (sub_firstline[matchcol] == NUL && nmatch <= 1 |
| 5784 && !re_multiline(regmatch.regprog))); | |
| 7 | 5785 nmatch = -1; |
| 5786 | |
| 5787 /* | |
| 5788 * Replace the line in the buffer when needed. This is | |
| 5789 * skipped when there are more matches. | |
| 5790 * The check for nmatch_tl is needed for when multi-line | |
| 5791 * matching must replace the lines before trying to do another | |
| 5792 * match, otherwise "\@<=" won't work. | |
| 1499 | 5793 * When the match starts below where we start searching also |
| 5794 * need to replace the line first (using \zs after \n). | |
| 7 | 5795 */ |
| 5796 if (lastone | |
| 5797 || nmatch_tl > 0 | |
| 5798 || (nmatch = vim_regexec_multi(®match, curwin, | |
| 1521 | 5799 curbuf, sub_firstlnum, |
|
11521
578df034735d
patch 8.0.0643: when a pattern search is slow Vim becomes unusable
Christian Brabandt <cb@256bit.org>
parents:
11494
diff
changeset
|
5800 matchcol, NULL, NULL)) == 0 |
| 1499 | 5801 || regmatch.startpos[0].lnum > 0) |
| 7 | 5802 { |
| 5803 if (new_start != NULL) | |
| 5804 { | |
| 5805 /* | |
| 5806 * Copy the rest of the line, that didn't match. | |
| 5807 * "matchcol" has to be adjusted, we use the end of | |
| 5808 * the line as reference, because the substitute may | |
| 5809 * have changed the number of characters. Same for | |
| 5810 * "prev_matchcol". | |
| 5811 */ | |
| 5812 STRCAT(new_start, sub_firstline + copycol); | |
| 5813 matchcol = (colnr_T)STRLEN(sub_firstline) - matchcol; | |
| 5814 prev_matchcol = (colnr_T)STRLEN(sub_firstline) | |
| 5815 - prev_matchcol; | |
| 5816 | |
| 5817 if (u_savesub(lnum) != OK) | |
| 5818 break; | |
| 5819 ml_replace(lnum, new_start, TRUE); | |
| 5820 | |
| 5821 if (nmatch_tl > 0) | |
| 5822 { | |
| 5823 /* | |
| 5824 * Matched lines have now been substituted and are | |
| 5825 * useless, delete them. The part after the match | |
| 5826 * has been appended to new_start, we don't need | |
| 5827 * it in the buffer. | |
| 5828 */ | |
| 5829 ++lnum; | |
| 5830 if (u_savedel(lnum, nmatch_tl) != OK) | |
| 5831 break; | |
| 5832 for (i = 0; i < nmatch_tl; ++i) | |
| 5833 ml_delete(lnum, (int)FALSE); | |
| 5834 mark_adjust(lnum, lnum + nmatch_tl - 1, | |
| 5835 (long)MAXLNUM, -nmatch_tl); | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5836 if (subflags.do_ask) |
| 7 | 5837 deleted_lines(lnum, nmatch_tl); |
| 5838 --lnum; | |
| 5839 line2 -= nmatch_tl; /* nr of lines decreases */ | |
| 5840 nmatch_tl = 0; | |
| 5841 } | |
| 5842 | |
| 5843 /* When asking, undo is saved each time, must also set | |
| 5844 * changed flag each time. */ | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5845 if (subflags.do_ask) |
| 7 | 5846 changed_bytes(lnum, 0); |
| 5847 else | |
| 5848 { | |
| 5849 if (first_line == 0) | |
| 5850 first_line = lnum; | |
| 5851 last_line = lnum + 1; | |
| 5852 } | |
| 5853 | |
| 5854 sub_firstlnum = lnum; | |
| 5855 vim_free(sub_firstline); /* free the temp buffer */ | |
| 5856 sub_firstline = new_start; | |
| 5857 new_start = NULL; | |
| 5858 matchcol = (colnr_T)STRLEN(sub_firstline) - matchcol; | |
| 5859 prev_matchcol = (colnr_T)STRLEN(sub_firstline) | |
| 5860 - prev_matchcol; | |
| 5861 copycol = 0; | |
| 5862 } | |
| 5863 if (nmatch == -1 && !lastone) | |
| 5864 nmatch = vim_regexec_multi(®match, curwin, curbuf, | |
|
11521
578df034735d
patch 8.0.0643: when a pattern search is slow Vim becomes unusable
Christian Brabandt <cb@256bit.org>
parents:
11494
diff
changeset
|
5865 sub_firstlnum, matchcol, NULL, NULL); |
| 7 | 5866 |
| 5867 /* | |
| 5868 * 5. break if there isn't another match in this line | |
| 5869 */ | |
| 5870 if (nmatch <= 0) | |
| 1499 | 5871 { |
| 5872 /* If the match found didn't start where we were | |
| 5873 * searching, do the next search in the line where we | |
| 5874 * found the match. */ | |
| 5875 if (nmatch == -1) | |
| 5876 lnum -= regmatch.startpos[0].lnum; | |
| 7 | 5877 break; |
| 1499 | 5878 } |
| 7 | 5879 } |
| 5880 | |
| 5881 line_breakcheck(); | |
| 5882 } | |
| 5883 | |
| 5884 if (did_sub) | |
| 5885 ++sub_nlines; | |
| 1720 | 5886 vim_free(new_start); /* for when substitute was cancelled */ |
|
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13174
diff
changeset
|
5887 VIM_CLEAR(sub_firstline); /* free the copy of the original line */ |
| 7 | 5888 } |
| 5889 | |
| 5890 line_breakcheck(); | |
| 5891 } | |
| 5892 | |
| 5893 if (first_line != 0) | |
| 5894 { | |
| 5895 /* Need to subtract the number of added lines from "last_line" to get | |
| 5896 * the line number before the change (same as adding the number of | |
| 5897 * deleted lines). */ | |
| 5898 i = curbuf->b_ml.ml_line_count - old_line_count; | |
| 5899 changed_lines(first_line, 0, last_line - i, i); | |
| 5900 } | |
| 5901 | |
| 5902 outofmem: | |
| 5903 vim_free(sub_firstline); /* may have to free allocated copy of the line */ | |
| 170 | 5904 |
| 5905 /* ":s/pat//n" doesn't move the cursor */ | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5906 if (subflags.do_count) |
| 170 | 5907 curwin->w_cursor = old_cursor; |
| 5908 | |
|
2126
e038754d419a
updated for version 7.2.408
Bram Moolenaar <bram@zimbu.org>
parents:
1929
diff
changeset
|
5909 if (sub_nsubs > start_nsubs) |
| 7 | 5910 { |
| 5911 /* Set the '[ and '] marks. */ | |
| 5912 curbuf->b_op_start.lnum = eap->line1; | |
| 5913 curbuf->b_op_end.lnum = line2; | |
| 5914 curbuf->b_op_start.col = curbuf->b_op_end.col = 0; | |
| 5915 | |
| 5916 if (!global_busy) | |
| 5917 { | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5918 /* when interactive leave cursor on the match */ |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5919 if (!subflags.do_ask) |
| 3394 | 5920 { |
| 5921 if (endcolumn) | |
| 5922 coladvance((colnr_T)MAXCOL); | |
| 5923 else | |
| 5924 beginline(BL_WHITE | BL_FIX); | |
| 5925 } | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5926 if (!do_sub_msg(subflags.do_count) && subflags.do_ask) |
| 7 | 5927 MSG(""); |
| 5928 } | |
| 5929 else | |
| 5930 global_need_beginline = TRUE; | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5931 if (subflags.do_print) |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5932 print_line(curwin->w_cursor.lnum, |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5933 subflags.do_number, subflags.do_list); |
| 7 | 5934 } |
| 5935 else if (!global_busy) | |
| 5936 { | |
| 5937 if (got_int) /* interrupted */ | |
| 5938 EMSG(_(e_interr)); | |
| 5939 else if (got_match) /* did find something but nothing substituted */ | |
| 5940 MSG(""); | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5941 else if (subflags.do_error) /* nothing found */ |
| 7 | 5942 EMSG2(_(e_patnotf2), get_search_pat()); |
| 5943 } | |
| 5944 | |
| 4035 | 5945 #ifdef FEAT_FOLDING |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5946 if (subflags.do_ask && hasAnyFolding(curwin)) |
| 4035 | 5947 /* Cursor position may require updating */ |
| 5948 changed_window_setting(); | |
| 5949 #endif | |
| 5950 | |
|
4805
66803af09906
updated for version 7.3.1149
Bram Moolenaar <bram@vim.org>
parents:
4613
diff
changeset
|
5951 vim_regfree(regmatch.regprog); |
| 6789 | 5952 |
| 5953 /* Restore the flag values, they can be used for ":&&". */ | |
|
9890
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5954 subflags.do_all = save_do_all; |
|
064effd222a3
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Christian Brabandt <cb@256bit.org>
parents:
9715
diff
changeset
|
5955 subflags.do_ask = save_do_ask; |
| 7 | 5956 } |
| 5957 | |
| 5958 /* | |
| 5959 * Give message for number of substitutions. | |
| 5960 * Can also be used after a ":global" command. | |
| 5961 * Return TRUE if a message was given. | |
| 5962 */ | |
| 484 | 5963 int |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
5964 do_sub_msg( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
5965 int count_only) /* used 'n' flag for ":s" */ |
| 7 | 5966 { |
| 5967 /* | |
| 5968 * Only report substitutions when: | |
| 5969 * - more than 'report' substitutions | |
| 5970 * - command was typed by user, or number of changed lines > 'report' | |
| 5971 * - giving messages is not disabled by 'lazyredraw' | |
| 5972 */ | |
| 170 | 5973 if (((sub_nsubs > p_report && (KeyTyped || sub_nlines > 1 || p_report < 1)) |
| 5974 || count_only) | |
| 7 | 5975 && messaging()) |
| 5976 { | |
|
14585
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5977 char *msg_single; |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5978 char *msg_plural; |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5979 |
| 7 | 5980 if (got_int) |
| 5981 STRCPY(msg_buf, _("(Interrupted) ")); | |
|
2290
22529abcd646
Fixed ":s" message. Docs updates.
Bram Moolenaar <bram@vim.org>
parents:
2280
diff
changeset
|
5982 else |
|
22529abcd646
Fixed ":s" message. Docs updates.
Bram Moolenaar <bram@vim.org>
parents:
2280
diff
changeset
|
5983 *msg_buf = NUL; |
|
14585
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5984 |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5985 msg_single = count_only |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5986 ? NGETTEXT("%ld match on %ld line", |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5987 "%ld matches on %ld line", sub_nsubs) |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5988 : NGETTEXT("%ld substitution on %ld line", |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5989 "%ld substitutions on %ld line", sub_nsubs); |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5990 msg_plural = count_only |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5991 ? NGETTEXT("%ld match on %ld lines", |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5992 "%ld matches on %ld lines", sub_nsubs) |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5993 : NGETTEXT("%ld substitution on %ld lines", |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5994 "%ld substitutions on %ld lines", sub_nsubs); |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5995 |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5996 vim_snprintf_add((char *)msg_buf, sizeof(msg_buf), |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5997 NGETTEXT(msg_single, msg_plural, sub_nlines), |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5998 sub_nsubs, (long)sub_nlines); |
|
c8f07e8b273e
patch 8.1.0306: plural messages are not translated properly
Christian Brabandt <cb@256bit.org>
parents:
14513
diff
changeset
|
5999 |
| 7 | 6000 if (msg(msg_buf)) |
| 6001 /* save message to display it after redraw */ | |
| 680 | 6002 set_keep_msg(msg_buf, 0); |
| 7 | 6003 return TRUE; |
| 6004 } | |
| 6005 if (got_int) | |
| 6006 { | |
| 6007 EMSG(_(e_interr)); | |
| 6008 return TRUE; | |
| 6009 } | |
| 6010 return FALSE; | |
| 6011 } | |
| 6012 | |
|
11494
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6013 static void |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6014 global_exe_one(char_u *cmd, linenr_T lnum) |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6015 { |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6016 curwin->w_cursor.lnum = lnum; |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6017 curwin->w_cursor.col = 0; |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6018 if (*cmd == NUL || *cmd == '\n') |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6019 do_cmdline((char_u *)"p", NULL, NULL, DOCMD_NOWAIT); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6020 else |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6021 do_cmdline(cmd, NULL, NULL, DOCMD_NOWAIT); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6022 } |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6023 |
| 7 | 6024 /* |
| 6025 * Execute a global command of the form: | |
| 6026 * | |
| 6027 * g/pattern/X : execute X on all lines where pattern matches | |
| 6028 * v/pattern/X : execute X on all lines where pattern does not match | |
| 6029 * | |
| 6030 * where 'X' is an EX command | |
| 6031 * | |
| 6032 * The command character (as well as the trailing slash) is optional, and | |
| 6033 * is assumed to be 'p' if missing. | |
| 6034 * | |
| 6035 * This is implemented in two passes: first we scan the file for the pattern and | |
| 3786 | 6036 * set a mark for each line that (not) matches. Secondly we execute the command |
| 7 | 6037 * for each line that has a mark. This is required because after deleting |
| 6038 * lines we do not know where to search for the next match. | |
| 6039 */ | |
| 6040 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6041 ex_global(exarg_T *eap) |
| 7 | 6042 { |
| 6043 linenr_T lnum; /* line number according to old situation */ | |
| 170 | 6044 int ndone = 0; |
| 7 | 6045 int type; /* first char of cmd: 'v' or 'g' */ |
| 6046 char_u *cmd; /* command argument */ | |
| 6047 | |
| 6048 char_u delim; /* delimiter, normally '/' */ | |
| 6049 char_u *pat; | |
| 6050 regmmatch_T regmatch; | |
| 6051 int match; | |
| 6052 int which_pat; | |
| 6053 | |
|
11494
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6054 /* When nesting the command works on one line. This allows for |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6055 * ":g/found/v/notfound/command". */ |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6056 if (global_busy && (eap->line1 != 1 |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6057 || eap->line2 != curbuf->b_ml.ml_line_count)) |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6058 { |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6059 /* will increment global_busy to break out of the loop */ |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6060 EMSG(_("E147: Cannot do :global recursive with a range")); |
| 7 | 6061 return; |
| 6062 } | |
| 6063 | |
| 6064 if (eap->forceit) /* ":global!" is like ":vglobal" */ | |
| 6065 type = 'v'; | |
| 6066 else | |
| 6067 type = *eap->cmd; | |
| 6068 cmd = eap->arg; | |
| 6069 which_pat = RE_LAST; /* default: use last used regexp */ | |
| 6070 | |
| 6071 /* | |
| 6072 * undocumented vi feature: | |
| 6073 * "\/" and "\?": use previous search pattern. | |
| 6074 * "\&": use previous substitute pattern. | |
| 6075 */ | |
| 6076 if (*cmd == '\\') | |
| 6077 { | |
| 6078 ++cmd; | |
| 6079 if (vim_strchr((char_u *)"/?&", *cmd) == NULL) | |
| 6080 { | |
| 6081 EMSG(_(e_backslash)); | |
| 6082 return; | |
| 6083 } | |
| 6084 if (*cmd == '&') | |
| 6085 which_pat = RE_SUBST; /* use previous substitute pattern */ | |
| 6086 else | |
| 6087 which_pat = RE_SEARCH; /* use previous search pattern */ | |
| 6088 ++cmd; | |
| 6089 pat = (char_u *)""; | |
| 6090 } | |
| 6091 else if (*cmd == NUL) | |
| 6092 { | |
| 6093 EMSG(_("E148: Regular expression missing from global")); | |
| 6094 return; | |
| 6095 } | |
| 6096 else | |
| 6097 { | |
| 6098 delim = *cmd; /* get the delimiter */ | |
| 6099 if (delim) | |
| 6100 ++cmd; /* skip delimiter if there is one */ | |
| 6101 pat = cmd; /* remember start of pattern */ | |
| 6102 cmd = skip_regexp(cmd, delim, p_magic, &eap->arg); | |
| 6103 if (cmd[0] == delim) /* end delimiter found */ | |
| 6104 *cmd++ = NUL; /* replace it with a NUL */ | |
| 6105 } | |
| 6106 | |
| 6107 #ifdef FEAT_FKMAP /* when in Farsi mode, reverse the character flow */ | |
| 6108 if (p_altkeymap && curwin->w_p_rl) | |
| 6109 lrFswap(pat,0); | |
| 6110 #endif | |
| 6111 | |
| 6112 if (search_regcomp(pat, RE_BOTH, which_pat, SEARCH_HIS, ®match) == FAIL) | |
| 6113 { | |
| 6114 EMSG(_(e_invcmd)); | |
| 6115 return; | |
| 6116 } | |
| 6117 | |
|
11494
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6118 if (global_busy) |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6119 { |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6120 lnum = curwin->w_cursor.lnum; |
| 1521 | 6121 match = vim_regexec_multi(®match, curwin, curbuf, lnum, |
|
11521
578df034735d
patch 8.0.0643: when a pattern search is slow Vim becomes unusable
Christian Brabandt <cb@256bit.org>
parents:
11494
diff
changeset
|
6122 (colnr_T)0, NULL, NULL); |
| 7 | 6123 if ((type == 'g' && match) || (type == 'v' && !match)) |
|
11494
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6124 global_exe_one(cmd, lnum); |
| 7 | 6125 } |
| 6126 else | |
| 6116 | 6127 { |
|
11494
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6128 /* |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6129 * pass 1: set marks for each (not) matching line |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6130 */ |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6131 for (lnum = eap->line1; lnum <= eap->line2 && !got_int; ++lnum) |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6132 { |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6133 /* a match on this line? */ |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6134 match = vim_regexec_multi(®match, curwin, curbuf, lnum, |
|
11521
578df034735d
patch 8.0.0643: when a pattern search is slow Vim becomes unusable
Christian Brabandt <cb@256bit.org>
parents:
11494
diff
changeset
|
6135 (colnr_T)0, NULL, NULL); |
|
11494
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6136 if ((type == 'g' && match) || (type == 'v' && !match)) |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6137 { |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6138 ml_setmarked(lnum); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6139 ndone++; |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6140 } |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6141 line_breakcheck(); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6142 } |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6143 |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6144 /* |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6145 * pass 2: execute the command for each line that has been marked |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6146 */ |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6147 if (got_int) |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6148 MSG(_(e_interr)); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6149 else if (ndone == 0) |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6150 { |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6151 if (type == 'v') |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6152 smsg((char_u *)_("Pattern found in every line: %s"), pat); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6153 else |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6154 smsg((char_u *)_("Pattern not found: %s"), pat); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6155 } |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6156 else |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6157 { |
| 6116 | 6158 #ifdef FEAT_CLIPBOARD |
|
11494
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6159 start_global_changes(); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6160 #endif |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6161 global_exe(cmd); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6162 #ifdef FEAT_CLIPBOARD |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6163 end_global_changes(); |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6164 #endif |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6165 } |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6166 |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6167 ml_clearmarked(); /* clear rest of the marks */ |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6168 } |
|
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6169 |
|
4805
66803af09906
updated for version 7.3.1149
Bram Moolenaar <bram@vim.org>
parents:
4613
diff
changeset
|
6170 vim_regfree(regmatch.regprog); |
| 7 | 6171 } |
| 6172 | |
| 6173 /* | |
| 6174 * Execute "cmd" on lines marked with ml_setmarked(). | |
| 6175 */ | |
| 6176 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6177 global_exe(char_u *cmd) |
| 7 | 6178 { |
| 2819 | 6179 linenr_T old_lcount; /* b_ml.ml_line_count before the command */ |
| 6180 buf_T *old_buf = curbuf; /* remember what buffer we started in */ | |
| 6181 linenr_T lnum; /* line number according to old situation */ | |
| 7 | 6182 |
| 6183 /* | |
| 6184 * Set current position only once for a global command. | |
| 6185 * If global_busy is set, setpcmark() will not do anything. | |
| 6186 * If there is an error, global_busy will be incremented. | |
| 6187 */ | |
| 6188 setpcmark(); | |
| 6189 | |
| 6190 /* When the command writes a message, don't overwrite the command. */ | |
| 6191 msg_didout = TRUE; | |
| 6192 | |
|
2127
4e22214f8464
updated for version 7.2.409
Bram Moolenaar <bram@zimbu.org>
parents:
2126
diff
changeset
|
6193 sub_nsubs = 0; |
|
4e22214f8464
updated for version 7.2.409
Bram Moolenaar <bram@zimbu.org>
parents:
2126
diff
changeset
|
6194 sub_nlines = 0; |
| 7 | 6195 global_need_beginline = FALSE; |
| 6196 global_busy = 1; | |
| 6197 old_lcount = curbuf->b_ml.ml_line_count; | |
| 6198 while (!got_int && (lnum = ml_firstmarked()) != 0 && global_busy == 1) | |
| 6199 { | |
|
11494
8e5ec22db3d8
patch 8.0.0630: it is not easy to work on lines without a match
Christian Brabandt <cb@256bit.org>
parents:
11476
diff
changeset
|
6200 global_exe_one(cmd, lnum); |
| 7 | 6201 ui_breakcheck(); |
| 6202 } | |
| 6203 | |
| 6204 global_busy = 0; | |
| 6205 if (global_need_beginline) | |
| 6206 beginline(BL_WHITE | BL_FIX); | |
| 6207 else | |
| 6208 check_cursor(); /* cursor may be beyond the end of the line */ | |
| 6209 | |
| 39 | 6210 /* the cursor may not have moved in the text but a change in a previous |
| 6211 * line may move it on the screen */ | |
| 6212 changed_line_abv_curs(); | |
| 6213 | |
| 7 | 6214 /* If it looks like no message was written, allow overwriting the |
| 6215 * command with the report for number of changes. */ | |
| 6216 if (msg_col == 0 && msg_scrolled == 0) | |
| 6217 msg_didout = FALSE; | |
| 6218 | |
| 1227 | 6219 /* If substitutes done, report number of substitutes, otherwise report |
| 2819 | 6220 * number of extra or deleted lines. |
| 6221 * Don't report extra or deleted lines in the edge case where the buffer | |
| 6222 * we are in after execution is different from the buffer we started in. */ | |
| 6223 if (!do_sub_msg(FALSE) && curbuf == old_buf) | |
| 7 | 6224 msgmore(curbuf->b_ml.ml_line_count - old_lcount); |
| 6225 } | |
| 6226 | |
| 6227 #ifdef FEAT_VIMINFO | |
| 6228 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6229 read_viminfo_sub_string(vir_T *virp, int force) |
| 7 | 6230 { |
| 2690 | 6231 if (force) |
| 7 | 6232 vim_free(old_sub); |
| 6233 if (force || old_sub == NULL) | |
| 6234 old_sub = viminfo_readstring(virp, 1, TRUE); | |
| 6235 return viminfo_readline(virp); | |
| 6236 } | |
| 6237 | |
| 6238 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6239 write_viminfo_sub_string(FILE *fp) |
| 7 | 6240 { |
| 6241 if (get_viminfo_parameter('/') != 0 && old_sub != NULL) | |
| 6242 { | |
|
2545
298d8d6e69be
Avoid warnings from the clang compiler. (Dominique Pelle)
Bram Moolenaar <bram@vim.org>
parents:
2394
diff
changeset
|
6243 fputs(_("\n# Last Substitute String:\n$"), fp); |
| 7 | 6244 viminfo_writestring(fp, old_sub); |
| 6245 } | |
| 6246 } | |
| 6247 #endif /* FEAT_VIMINFO */ | |
| 6248 | |
| 359 | 6249 #if defined(EXITFREE) || defined(PROTO) |
| 6250 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6251 free_old_sub(void) |
| 359 | 6252 { |
| 6253 vim_free(old_sub); | |
| 6254 } | |
| 6255 #endif | |
| 6256 | |
|
12477
68d7bc045dbe
patch 8.0.1118: FEAT_WINDOWS adds a lot of #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
12297
diff
changeset
|
6257 #if defined(FEAT_QUICKFIX) || defined(PROTO) |
| 7 | 6258 /* |
| 6259 * Set up for a tagpreview. | |
| 735 | 6260 * Return TRUE when it was created. |
| 7 | 6261 */ |
| 735 | 6262 int |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6263 prepare_tagpreview( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6264 int undo_sync) /* sync undo when leaving the window */ |
| 7 | 6265 { |
| 6266 win_T *wp; | |
| 6267 | |
| 6268 # ifdef FEAT_GUI | |
| 6269 need_mouse_correct = TRUE; | |
| 6270 # endif | |
| 6271 | |
| 6272 /* | |
| 6273 * If there is already a preview window open, use that one. | |
| 6274 */ | |
| 6275 if (!curwin->w_p_pvw) | |
| 6276 { | |
|
9649
fd9727ae3c49
commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
6277 FOR_ALL_WINDOWS(wp) |
| 7 | 6278 if (wp->w_p_pvw) |
| 6279 break; | |
| 6280 if (wp != NULL) | |
| 816 | 6281 win_enter(wp, undo_sync); |
| 7 | 6282 else |
| 6283 { | |
| 6284 /* | |
| 6285 * There is no preview window open yet. Create one. | |
| 6286 */ | |
| 6287 if (win_split(g_do_tagpreview > 0 ? g_do_tagpreview : 0, 0) | |
| 6288 == FAIL) | |
| 735 | 6289 return FALSE; |
| 7 | 6290 curwin->w_p_pvw = TRUE; |
| 6291 curwin->w_p_wfh = TRUE; | |
| 2583 | 6292 RESET_BINDING(curwin); /* don't take over 'scrollbind' |
| 6293 and 'cursorbind' */ | |
| 7 | 6294 # ifdef FEAT_DIFF |
| 6295 curwin->w_p_diff = FALSE; /* no 'diff' */ | |
| 6296 # endif | |
| 6297 # ifdef FEAT_FOLDING | |
| 6298 curwin->w_p_fdc = 0; /* no 'foldcolumn' */ | |
| 6299 # endif | |
| 735 | 6300 return TRUE; |
| 7 | 6301 } |
| 6302 } | |
| 735 | 6303 return FALSE; |
| 7 | 6304 } |
| 6305 | |
| 6306 #endif | |
| 6307 | |
| 6308 | |
| 6309 /* | |
| 6310 * ":help": open a read-only window on a help file | |
| 6311 */ | |
| 6312 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6313 ex_help(exarg_T *eap) |
| 7 | 6314 { |
| 6315 char_u *arg; | |
| 6316 char_u *tag; | |
| 6317 FILE *helpfd; /* file descriptor of help file */ | |
| 6318 int n; | |
| 6319 int i; | |
| 6320 win_T *wp; | |
| 6321 int num_matches; | |
| 6322 char_u **matches; | |
| 6323 char_u *p; | |
| 6324 int empty_fnum = 0; | |
| 6325 int alt_fnum = 0; | |
| 6326 buf_T *buf; | |
| 6327 #ifdef FEAT_MULTI_LANG | |
| 6328 int len; | |
| 9 | 6329 char_u *lang; |
| 7 | 6330 #endif |
| 3112 | 6331 #ifdef FEAT_FOLDING |
| 6332 int old_KeyTyped = KeyTyped; | |
| 6333 #endif | |
| 7 | 6334 |
| 6335 if (eap != NULL) | |
| 6336 { | |
| 6337 /* | |
| 6338 * A ":help" command ends at the first LF, or at a '|' that is | |
| 6339 * followed by some text. Set nextcmd to the following command. | |
| 6340 */ | |
| 6341 for (arg = eap->arg; *arg; ++arg) | |
| 6342 { | |
| 6343 if (*arg == '\n' || *arg == '\r' | |
| 6344 || (*arg == '|' && arg[1] != NUL && arg[1] != '|')) | |
| 6345 { | |
| 6346 *arg++ = NUL; | |
| 6347 eap->nextcmd = arg; | |
| 6348 break; | |
| 6349 } | |
| 6350 } | |
| 6351 arg = eap->arg; | |
| 6352 | |
| 3446 | 6353 if (eap->forceit && *arg == NUL && !curbuf->b_help) |
| 7 | 6354 { |
| 6355 EMSG(_("E478: Don't panic!")); | |
| 6356 return; | |
| 6357 } | |
| 6358 | |
| 6359 if (eap->skip) /* not executing commands */ | |
| 6360 return; | |
| 6361 } | |
| 6362 else | |
| 6363 arg = (char_u *)""; | |
| 6364 | |
| 6365 /* remove trailing blanks */ | |
| 6366 p = arg + STRLEN(arg) - 1; | |
|
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11127
diff
changeset
|
6367 while (p > arg && VIM_ISWHITE(*p) && p[-1] != '\\') |
| 7 | 6368 *p-- = NUL; |
| 6369 | |
| 6370 #ifdef FEAT_MULTI_LANG | |
| 6371 /* Check for a specified language */ | |
| 9 | 6372 lang = check_help_lang(arg); |
| 7 | 6373 #endif |
| 6374 | |
| 6375 /* When no argument given go to the index. */ | |
| 6376 if (*arg == NUL) | |
| 6377 arg = (char_u *)"help.txt"; | |
| 6378 | |
| 6379 /* | |
| 6380 * Check if there is a match for the argument. | |
| 6381 */ | |
| 6382 n = find_help_tags(arg, &num_matches, &matches, | |
| 6383 eap != NULL && eap->forceit); | |
| 6384 | |
| 6385 i = 0; | |
| 6386 #ifdef FEAT_MULTI_LANG | |
| 6387 if (n != FAIL && lang != NULL) | |
| 6388 /* Find first item with the requested language. */ | |
| 6389 for (i = 0; i < num_matches; ++i) | |
| 6390 { | |
| 835 | 6391 len = (int)STRLEN(matches[i]); |
| 7 | 6392 if (len > 3 && matches[i][len - 3] == '@' |
| 6393 && STRICMP(matches[i] + len - 2, lang) == 0) | |
| 6394 break; | |
| 6395 } | |
| 6396 #endif | |
| 6397 if (i >= num_matches || n == FAIL) | |
| 6398 { | |
| 6399 #ifdef FEAT_MULTI_LANG | |
| 6400 if (lang != NULL) | |
| 6401 EMSG3(_("E661: Sorry, no '%s' help for %s"), lang, arg); | |
| 6402 else | |
| 6403 #endif | |
| 6404 EMSG2(_("E149: Sorry, no help for %s"), arg); | |
| 6405 if (n != FAIL) | |
| 6406 FreeWild(num_matches, matches); | |
| 6407 return; | |
| 6408 } | |
| 6409 | |
| 6410 /* The first match (in the requested language) is the best match. */ | |
| 6411 tag = vim_strsave(matches[i]); | |
| 6412 FreeWild(num_matches, matches); | |
| 6413 | |
| 6414 #ifdef FEAT_GUI | |
| 6415 need_mouse_correct = TRUE; | |
| 6416 #endif | |
| 6417 | |
| 6418 /* | |
| 6419 * Re-use an existing help window or open a new one. | |
| 684 | 6420 * Always open a new one for ":tab help". |
| 7 | 6421 */ |
|
12477
68d7bc045dbe
patch 8.0.1118: FEAT_WINDOWS adds a lot of #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
12297
diff
changeset
|
6422 if (!bt_help(curwin->w_buffer) || cmdmod.tab != 0) |
|
68d7bc045dbe
patch 8.0.1118: FEAT_WINDOWS adds a lot of #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
12297
diff
changeset
|
6423 { |
| 684 | 6424 if (cmdmod.tab != 0) |
| 6425 wp = NULL; | |
| 6426 else | |
|
9649
fd9727ae3c49
commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
6427 FOR_ALL_WINDOWS(wp) |
|
11800
5ceaecedbad2
patch 8.0.0782: using freed memory in quickfix code
Christian Brabandt <cb@256bit.org>
parents:
11666
diff
changeset
|
6428 if (bt_help(wp->w_buffer)) |
| 684 | 6429 break; |
| 7 | 6430 if (wp != NULL && wp->w_buffer->b_nwindows > 0) |
| 6431 win_enter(wp, TRUE); | |
| 6432 else | |
| 6433 { | |
| 6434 /* | |
| 6435 * There is no help window yet. | |
| 6436 * Try to open the file specified by the "helpfile" option. | |
| 6437 */ | |
| 6438 if ((helpfd = mch_fopen((char *)p_hf, READBIN)) == NULL) | |
| 6439 { | |
| 274 | 6440 smsg((char_u *)_("Sorry, help file \"%s\" not found"), p_hf); |
| 7 | 6441 goto erret; |
| 6442 } | |
| 6443 fclose(helpfd); | |
| 6444 | |
| 6445 /* Split off help window; put it at far top if no position | |
| 684 | 6446 * specified, the current window is vertically split and |
| 6447 * narrow. */ | |
| 7 | 6448 n = WSP_HELP; |
| 6449 if (cmdmod.split == 0 && curwin->w_width != Columns | |
| 684 | 6450 && curwin->w_width < 80) |
| 7 | 6451 n |= WSP_TOP; |
| 6452 if (win_split(0, n) == FAIL) | |
| 684 | 6453 goto erret; |
|
12477
68d7bc045dbe
patch 8.0.1118: FEAT_WINDOWS adds a lot of #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
12297
diff
changeset
|
6454 |
| 7 | 6455 if (curwin->w_height < p_hh) |
| 6456 win_setheight((int)p_hh); | |
| 6457 | |
| 6458 /* | |
| 6459 * Open help file (do_ecmd() will set b_help flag, readfile() will | |
| 6460 * set b_p_ro flag). | |
| 6461 * Set the alternate file to the previously edited file. | |
| 6462 */ | |
| 6463 alt_fnum = curbuf->b_fnum; | |
| 6464 (void)do_ecmd(0, NULL, NULL, NULL, ECMD_LASTL, | |
| 1743 | 6465 ECMD_HIDE + ECMD_SET_HELP, |
|
12477
68d7bc045dbe
patch 8.0.1118: FEAT_WINDOWS adds a lot of #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
12297
diff
changeset
|
6466 NULL); /* buffer is still open, don't store info */ |
| 22 | 6467 if (!cmdmod.keepalt) |
| 6468 curwin->w_alt_fnum = alt_fnum; | |
| 7 | 6469 empty_fnum = curbuf->b_fnum; |
| 6470 } | |
| 6471 } | |
| 6472 | |
| 6473 if (!p_im) | |
| 6474 restart_edit = 0; /* don't want insert mode in help file */ | |
| 6475 | |
| 3112 | 6476 #ifdef FEAT_FOLDING |
| 6477 /* Restore KeyTyped, setting 'filetype=help' may reset it. | |
| 6478 * It is needed for do_tag top open folds under the cursor. */ | |
| 6479 KeyTyped = old_KeyTyped; | |
| 6480 #endif | |
| 6481 | |
| 7 | 6482 if (tag != NULL) |
| 6483 do_tag(tag, DT_HELP, 1, FALSE, TRUE); | |
| 6484 | |
| 819 | 6485 /* Delete the empty buffer if we're not using it. Careful: autocommands |
| 6486 * may have jumped to another window, check that the buffer is not in a | |
| 6487 * window. */ | |
| 7 | 6488 if (empty_fnum != 0 && curbuf->b_fnum != empty_fnum) |
| 6489 { | |
| 6490 buf = buflist_findnr(empty_fnum); | |
| 819 | 6491 if (buf != NULL && buf->b_nwindows == 0) |
| 7 | 6492 wipe_buffer(buf, TRUE); |
| 6493 } | |
| 6494 | |
| 6495 /* keep the previous alternate file */ | |
| 22 | 6496 if (alt_fnum != 0 && curwin->w_alt_fnum == empty_fnum && !cmdmod.keepalt) |
| 7 | 6497 curwin->w_alt_fnum = alt_fnum; |
| 6498 | |
| 6499 erret: | |
| 6500 vim_free(tag); | |
| 6501 } | |
| 6502 | |
| 6228 | 6503 /* |
| 6234 | 6504 * ":helpclose": Close one help window |
| 6228 | 6505 */ |
| 6506 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6507 ex_helpclose(exarg_T *eap UNUSED) |
| 6228 | 6508 { |
| 6509 win_T *win; | |
| 6510 | |
| 6511 FOR_ALL_WINDOWS(win) | |
| 6512 { | |
|
11800
5ceaecedbad2
patch 8.0.0782: using freed memory in quickfix code
Christian Brabandt <cb@256bit.org>
parents:
11666
diff
changeset
|
6513 if (bt_help(win->w_buffer)) |
| 6228 | 6514 { |
| 6515 win_close(win, FALSE); | |
| 6234 | 6516 return; |
| 6228 | 6517 } |
| 6518 } | |
| 6519 } | |
| 7 | 6520 |
| 9 | 6521 #if defined(FEAT_MULTI_LANG) || defined(PROTO) |
| 6522 /* | |
| 6523 * In an argument search for a language specifiers in the form "@xx". | |
| 6524 * Changes the "@" to NUL if found, and returns a pointer to "xx". | |
| 6525 * Returns NULL if not found. | |
| 6526 */ | |
| 6527 char_u * | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6528 check_help_lang(char_u *arg) |
| 9 | 6529 { |
| 835 | 6530 int len = (int)STRLEN(arg); |
| 9 | 6531 |
| 6532 if (len >= 3 && arg[len - 3] == '@' && ASCII_ISALPHA(arg[len - 2]) | |
| 6533 && ASCII_ISALPHA(arg[len - 1])) | |
| 6534 { | |
| 6535 arg[len - 3] = NUL; /* remove the '@' */ | |
| 6536 return arg + len - 2; | |
| 6537 } | |
| 6538 return NULL; | |
| 6539 } | |
| 6540 #endif | |
| 6541 | |
| 7 | 6542 /* |
| 6543 * Return a heuristic indicating how well the given string matches. The | |
| 6544 * smaller the number, the better the match. This is the order of priorities, | |
| 6545 * from best match to worst match: | |
| 6546 * - Match with least alpha-numeric characters is better. | |
| 6547 * - Match with least total characters is better. | |
| 6548 * - Match towards the start is better. | |
| 6549 * - Match starting with "+" is worse (feature instead of command) | |
| 6550 * Assumption is made that the matched_string passed has already been found to | |
| 6551 * match some string for which help is requested. webb. | |
| 6552 */ | |
| 6553 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6554 help_heuristic( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6555 char_u *matched_string, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6556 int offset, /* offset for match */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6557 int wrong_case) /* no matching case */ |
| 7 | 6558 { |
| 6559 int num_letters; | |
| 6560 char_u *p; | |
| 6561 | |
| 6562 num_letters = 0; | |
| 6563 for (p = matched_string; *p; p++) | |
| 6564 if (ASCII_ISALNUM(*p)) | |
| 6565 num_letters++; | |
| 6566 | |
| 6567 /* | |
| 6568 * Multiply the number of letters by 100 to give it a much bigger | |
| 6569 * weighting than the number of characters. | |
| 6570 * If there only is a match while ignoring case, add 5000. | |
| 6571 * If the match starts in the middle of a word, add 10000 to put it | |
| 6572 * somewhere in the last half. | |
| 6573 * If the match is more than 2 chars from the start, multiply by 200 to | |
| 6574 * put it after matches at the start. | |
| 6575 */ | |
| 6576 if (ASCII_ISALNUM(matched_string[offset]) && offset > 0 | |
| 6577 && ASCII_ISALNUM(matched_string[offset - 1])) | |
| 6578 offset += 10000; | |
| 6579 else if (offset > 2) | |
| 6580 offset *= 200; | |
| 6581 if (wrong_case) | |
| 6582 offset += 5000; | |
| 6583 /* Features are less interesting than the subjects themselves, but "+" | |
| 6584 * alone is not a feature. */ | |
| 6585 if (matched_string[0] == '+' && matched_string[1] != NUL) | |
| 6586 offset += 100; | |
| 6587 return (int)(100 * num_letters + STRLEN(matched_string) + offset); | |
| 6588 } | |
| 6589 | |
| 6590 /* | |
| 6591 * Compare functions for qsort() below, that checks the help heuristics number | |
| 6592 * that has been put after the tagname by find_tags(). | |
| 6593 */ | |
| 6594 static int | |
| 6595 #ifdef __BORLANDC__ | |
| 6596 _RTLENTRYF | |
| 6597 #endif | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6598 help_compare(const void *s1, const void *s2) |
| 7 | 6599 { |
| 6600 char *p1; | |
| 6601 char *p2; | |
| 6602 | |
| 6603 p1 = *(char **)s1 + strlen(*(char **)s1) + 1; | |
| 6604 p2 = *(char **)s2 + strlen(*(char **)s2) + 1; | |
| 6605 return strcmp(p1, p2); | |
| 6606 } | |
| 6607 | |
| 6608 /* | |
| 6609 * Find all help tags matching "arg", sort them and return in matches[], with | |
| 6610 * the number of matches in num_matches. | |
| 6611 * The matches will be sorted with a "best" match algorithm. | |
| 6612 * When "keep_lang" is TRUE try keeping the language of the current buffer. | |
| 6613 */ | |
| 6614 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6615 find_help_tags( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6616 char_u *arg, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6617 int *num_matches, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6618 char_u ***matches, |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6619 int keep_lang) |
| 7 | 6620 { |
| 6621 char_u *s, *d; | |
| 6622 int i; | |
| 6623 static char *(mtable[]) = {"*", "g*", "[*", "]*", ":*", | |
| 445 | 6624 "/*", "/\\*", "\"*", "**", |
|
5269
7d1f89b27103
updated for version 7.4b.011
Bram Moolenaar <bram@vim.org>
parents:
5257
diff
changeset
|
6625 "cpo-*", "/\\(\\)", "/\\%(\\)", |
|
14443
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6626 "?", ":?", "?<CR>", "g?", "g?g?", "g??", |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6627 "-?", "q?", "v_g?", |
| 279 | 6628 "/\\?", "/\\z(\\)", "\\=", ":s\\=", |
|
10851
256b1b96c2ad
patch 8.0.0315: :help :[range] does not work
Christian Brabandt <cb@256bit.org>
parents:
10638
diff
changeset
|
6629 "[count]", "[quotex]", |
|
256b1b96c2ad
patch 8.0.0315: :help :[range] does not work
Christian Brabandt <cb@256bit.org>
parents:
10638
diff
changeset
|
6630 "[range]", ":[range]", |
| 5647 | 6631 "[pattern]", "\\|", "\\%$", |
| 6632 "s/\\~", "s/\\U", "s/\\L", | |
| 6633 "s/\\1", "s/\\2", "s/\\3", "s/\\9"}; | |
| 7 | 6634 static char *(rtable[]) = {"star", "gstar", "[star", "]star", ":star", |
| 445 | 6635 "/star", "/\\\\star", "quotestar", "starstar", |
|
5269
7d1f89b27103
updated for version 7.4b.011
Bram Moolenaar <bram@vim.org>
parents:
5257
diff
changeset
|
6636 "cpo-star", "/\\\\(\\\\)", "/\\\\%(\\\\)", |
|
14443
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6637 "?", ":?", "?<CR>", "g?", "g?g?", "g??", |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6638 "-?", "q?", "v_g?", |
| 279 | 6639 "/\\\\?", "/\\\\z(\\\\)", "\\\\=", ":s\\\\=", |
|
10851
256b1b96c2ad
patch 8.0.0315: :help :[range] does not work
Christian Brabandt <cb@256bit.org>
parents:
10638
diff
changeset
|
6640 "\\[count]", "\\[quotex]", |
|
256b1b96c2ad
patch 8.0.0315: :help :[range] does not work
Christian Brabandt <cb@256bit.org>
parents:
10638
diff
changeset
|
6641 "\\[range]", ":\\[range]", |
| 5647 | 6642 "\\[pattern]", "\\\\bar", "/\\\\%\\$", |
| 5867 | 6643 "s/\\\\\\~", "s/\\\\U", "s/\\\\L", |
| 5647 | 6644 "s/\\\\1", "s/\\\\2", "s/\\\\3", "s/\\\\9"}; |
|
14443
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6645 static char *(expr_table[]) = {"!=?", "!~?", "<=?", "<?", "==?", "=~?", |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6646 ">=?", ">?", "is?", "isnot?"}; |
| 7 | 6647 int flags; |
| 6648 | |
| 6649 d = IObuff; /* assume IObuff is long enough! */ | |
| 6650 | |
|
14443
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6651 if (STRNICMP(arg, "expr-", 5) == 0) |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6652 { |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6653 // When the string starting with "expr-" and containing '?' and matches |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6654 // the table, it is taken literally. Otherwise '?' is recognized as a |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6655 // wildcard. |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6656 for (i = (int)(sizeof(expr_table) / sizeof(char *)); --i >= 0; ) |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6657 if (STRCMP(arg + 5, expr_table[i]) == 0) |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6658 { |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6659 STRCPY(d, arg); |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6660 break; |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6661 } |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6662 } |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6663 else |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6664 { |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6665 // Recognize a few exceptions to the rule. Some strings that contain |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6666 // '*' with "star". Otherwise '*' is recognized as a wildcard. |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6667 for (i = (int)(sizeof(mtable) / sizeof(char *)); --i >= 0; ) |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6668 if (STRCMP(arg, mtable[i]) == 0) |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6669 { |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6670 STRCPY(d, rtable[i]); |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6671 break; |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6672 } |
|
e1c6aee62a72
patch 8.1.0235: more help tags that jump to the wrong location
Christian Brabandt <cb@256bit.org>
parents:
14435
diff
changeset
|
6673 } |
| 7 | 6674 |
| 6675 if (i < 0) /* no match in table */ | |
| 6676 { | |
| 6677 /* Replace "\S" with "/\\S", etc. Otherwise every tag is matched. | |
| 6678 * Also replace "\%^" and "\%(", they match every tag too. | |
| 6679 * Also "\zs", "\z1", etc. | |
| 6680 * Also "\@<", "\@=", "\@<=", etc. | |
| 6681 * And also "\_$" and "\_^". */ | |
| 6682 if (arg[0] == '\\' | |
| 6683 && ((arg[1] != NUL && arg[2] == NUL) | |
| 6684 || (vim_strchr((char_u *)"%_z@", arg[1]) != NULL | |
| 6685 && arg[2] != NUL))) | |
| 6686 { | |
| 6687 STRCPY(d, "/\\\\"); | |
| 6688 STRCPY(d + 3, arg + 1); | |
| 6689 /* Check for "/\\_$", should be "/\\_\$" */ | |
| 6690 if (d[3] == '_' && d[4] == '$') | |
| 6691 STRCPY(d + 4, "\\$"); | |
| 6692 } | |
| 6693 else | |
| 6694 { | |
| 3786 | 6695 /* Replace: |
| 6696 * "[:...:]" with "\[:...:]" | |
| 6697 * "[++...]" with "\[++...]" | |
| 5867 | 6698 * "\{" with "\\{" -- matching "} \}" |
| 3786 | 6699 */ |
| 6700 if ((arg[0] == '[' && (arg[1] == ':' | |
| 6701 || (arg[1] == '+' && arg[2] == '+'))) | |
| 6702 || (arg[0] == '\\' && arg[1] == '{')) | |
| 7 | 6703 *d++ = '\\'; |
| 6704 | |
|
8556
f4dca5239317
commit https://github.com/vim/vim/commit/00f9e0dbbd3472db217d56639fad9346b9eb3b82
Christian Brabandt <cb@256bit.org>
parents:
8544
diff
changeset
|
6705 /* |
|
f4dca5239317
commit https://github.com/vim/vim/commit/00f9e0dbbd3472db217d56639fad9346b9eb3b82
Christian Brabandt <cb@256bit.org>
parents:
8544
diff
changeset
|
6706 * If tag starts with "('", skip the "(". Fixes CTRL-] on ('option'. |
|
f4dca5239317
commit https://github.com/vim/vim/commit/00f9e0dbbd3472db217d56639fad9346b9eb3b82
Christian Brabandt <cb@256bit.org>
parents:
8544
diff
changeset
|
6707 */ |
|
f4dca5239317
commit https://github.com/vim/vim/commit/00f9e0dbbd3472db217d56639fad9346b9eb3b82
Christian Brabandt <cb@256bit.org>
parents:
8544
diff
changeset
|
6708 if (*arg == '(' && arg[1] == '\'') |
|
f4dca5239317
commit https://github.com/vim/vim/commit/00f9e0dbbd3472db217d56639fad9346b9eb3b82
Christian Brabandt <cb@256bit.org>
parents:
8544
diff
changeset
|
6709 arg++; |
| 7 | 6710 for (s = arg; *s; ++s) |
| 6711 { | |
| 6712 /* | |
| 6713 * Replace "|" with "bar" and '"' with "quote" to match the name of | |
| 6714 * the tags for these commands. | |
| 6715 * Replace "*" with ".*" and "?" with "." to match command line | |
| 6716 * completion. | |
| 6717 * Insert a backslash before '~', '$' and '.' to avoid their | |
| 6718 * special meaning. | |
| 6719 */ | |
| 6720 if (d - IObuff > IOSIZE - 10) /* getting too long!? */ | |
| 6721 break; | |
| 6722 switch (*s) | |
| 6723 { | |
| 6724 case '|': STRCPY(d, "bar"); | |
| 6725 d += 3; | |
| 6726 continue; | |
| 6727 case '"': STRCPY(d, "quote"); | |
| 6728 d += 5; | |
| 6729 continue; | |
| 6730 case '*': *d++ = '.'; | |
| 6731 break; | |
| 6732 case '?': *d++ = '.'; | |
| 6733 continue; | |
| 6734 case '$': | |
| 6735 case '.': | |
| 6736 case '~': *d++ = '\\'; | |
| 6737 break; | |
| 6738 } | |
| 6739 | |
| 6740 /* | |
| 6741 * Replace "^x" by "CTRL-X". Don't do this for "^_" to make | |
| 6742 * ":help i_^_CTRL-D" work. | |
| 6743 * Insert '-' before and after "CTRL-X" when applicable. | |
| 6744 */ | |
| 6745 if (*s < ' ' || (*s == '^' && s[1] && (ASCII_ISALPHA(s[1]) | |
| 6746 || vim_strchr((char_u *)"?@[\\]^", s[1]) != NULL))) | |
| 6747 { | |
|
5282
8c42772f0543
updated for version 7.4b.017
Bram Moolenaar <bram@vim.org>
parents:
5269
diff
changeset
|
6748 if (d > IObuff && d[-1] != '_' && d[-1] != '\\') |
|
8c42772f0543
updated for version 7.4b.017
Bram Moolenaar <bram@vim.org>
parents:
5269
diff
changeset
|
6749 *d++ = '_'; /* prepend a '_' to make x_CTRL-x */ |
| 7 | 6750 STRCPY(d, "CTRL-"); |
| 6751 d += 5; | |
| 6752 if (*s < ' ') | |
| 6753 { | |
| 6754 #ifdef EBCDIC | |
| 6755 *d++ = CtrlChar(*s); | |
| 6756 #else | |
| 6757 *d++ = *s + '@'; | |
| 6758 #endif | |
| 6759 if (d[-1] == '\\') | |
| 6760 *d++ = '\\'; /* double a backslash */ | |
| 6761 } | |
| 6762 else | |
| 6763 *d++ = *++s; | |
| 6764 if (s[1] != NUL && s[1] != '_') | |
| 6765 *d++ = '_'; /* append a '_' */ | |
| 6766 continue; | |
| 6767 } | |
| 6768 else if (*s == '^') /* "^" or "CTRL-^" or "^_" */ | |
| 6769 *d++ = '\\'; | |
| 6770 | |
| 6771 /* | |
| 6772 * Insert a backslash before a backslash after a slash, for search | |
| 6773 * pattern tags: "/\|" --> "/\\|". | |
| 6774 */ | |
| 6775 else if (s[0] == '\\' && s[1] != '\\' | |
| 6776 && *arg == '/' && s == arg + 1) | |
| 6777 *d++ = '\\'; | |
| 6778 | |
| 6779 /* "CTRL-\_" -> "CTRL-\\_" to avoid the special meaning of "\_" in | |
| 6780 * "CTRL-\_CTRL-N" */ | |
| 6781 if (STRNICMP(s, "CTRL-\\_", 7) == 0) | |
| 6782 { | |
| 6783 STRCPY(d, "CTRL-\\\\"); | |
| 6784 d += 7; | |
| 6785 s += 6; | |
| 6786 } | |
| 6787 | |
| 6788 *d++ = *s; | |
| 6789 | |
| 6790 /* | |
|
8883
b7de875169e6
commit https://github.com/vim/vim/commit/81edd171a9465cf99cede4fa4a7b7bca3d538b0f
Christian Brabandt <cb@256bit.org>
parents:
8879
diff
changeset
|
6791 * If tag contains "({" or "([", tag terminates at the "(". |
|
b7de875169e6
commit https://github.com/vim/vim/commit/81edd171a9465cf99cede4fa4a7b7bca3d538b0f
Christian Brabandt <cb@256bit.org>
parents:
8879
diff
changeset
|
6792 * This is for help on functions, e.g.: abs({expr}). |
|
b7de875169e6
commit https://github.com/vim/vim/commit/81edd171a9465cf99cede4fa4a7b7bca3d538b0f
Christian Brabandt <cb@256bit.org>
parents:
8879
diff
changeset
|
6793 */ |
|
b7de875169e6
commit https://github.com/vim/vim/commit/81edd171a9465cf99cede4fa4a7b7bca3d538b0f
Christian Brabandt <cb@256bit.org>
parents:
8879
diff
changeset
|
6794 if (*s == '(' && (s[1] == '{' || s[1] =='[')) |
|
b7de875169e6
commit https://github.com/vim/vim/commit/81edd171a9465cf99cede4fa4a7b7bca3d538b0f
Christian Brabandt <cb@256bit.org>
parents:
8879
diff
changeset
|
6795 break; |
|
b7de875169e6
commit https://github.com/vim/vim/commit/81edd171a9465cf99cede4fa4a7b7bca3d538b0f
Christian Brabandt <cb@256bit.org>
parents:
8879
diff
changeset
|
6796 |
|
b7de875169e6
commit https://github.com/vim/vim/commit/81edd171a9465cf99cede4fa4a7b7bca3d538b0f
Christian Brabandt <cb@256bit.org>
parents:
8879
diff
changeset
|
6797 /* |
| 7 | 6798 * If tag starts with ', toss everything after a second '. Fixes |
| 6799 * CTRL-] on 'option'. (would include the trailing '.'). | |
| 6800 */ | |
| 6801 if (*s == '\'' && s > arg && *arg == '\'') | |
| 6802 break; | |
|
9234
6e80397a592c
commit https://github.com/vim/vim/commit/28b942a064dd486cc241894b625ab72f5a5c6d1b
Christian Brabandt <cb@256bit.org>
parents:
8883
diff
changeset
|
6803 /* Also '{' and '}'. */ |
|
6e80397a592c
commit https://github.com/vim/vim/commit/28b942a064dd486cc241894b625ab72f5a5c6d1b
Christian Brabandt <cb@256bit.org>
parents:
8883
diff
changeset
|
6804 if (*s == '}' && s > arg && *arg == '{') |
|
6e80397a592c
commit https://github.com/vim/vim/commit/28b942a064dd486cc241894b625ab72f5a5c6d1b
Christian Brabandt <cb@256bit.org>
parents:
8883
diff
changeset
|
6805 break; |
| 7 | 6806 } |
| 6807 *d = NUL; | |
| 3480 | 6808 |
| 6809 if (*IObuff == '`') | |
| 6810 { | |
| 6811 if (d > IObuff + 2 && d[-1] == '`') | |
| 6812 { | |
| 6813 /* remove the backticks from `command` */ | |
| 6814 mch_memmove(IObuff, IObuff + 1, STRLEN(IObuff)); | |
| 6815 d[-2] = NUL; | |
| 6816 } | |
| 6817 else if (d > IObuff + 3 && d[-2] == '`' && d[-1] == ',') | |
| 6818 { | |
| 6819 /* remove the backticks and comma from `command`, */ | |
| 6820 mch_memmove(IObuff, IObuff + 1, STRLEN(IObuff)); | |
| 6821 d[-3] = NUL; | |
| 6822 } | |
| 6823 else if (d > IObuff + 4 && d[-3] == '`' | |
| 6824 && d[-2] == '\\' && d[-1] == '.') | |
| 6825 { | |
| 6826 /* remove the backticks and dot from `command`\. */ | |
| 6827 mch_memmove(IObuff, IObuff + 1, STRLEN(IObuff)); | |
| 6828 d[-4] = NUL; | |
| 6829 } | |
| 6830 } | |
| 7 | 6831 } |
| 6832 } | |
| 6833 | |
| 6834 *matches = (char_u **)""; | |
| 6835 *num_matches = 0; | |
| 6836 flags = TAG_HELP | TAG_REGEXP | TAG_NAMES | TAG_VERBOSE; | |
| 6837 if (keep_lang) | |
| 6838 flags |= TAG_KEEP_LANG; | |
| 1696 | 6839 if (find_tags(IObuff, num_matches, matches, flags, (int)MAXCOL, NULL) == OK |
| 7 | 6840 && *num_matches > 0) |
| 1696 | 6841 { |
| 7 | 6842 /* Sort the matches found on the heuristic number that is after the |
| 6843 * tag name. */ | |
| 6844 qsort((void *)*matches, (size_t)*num_matches, | |
| 6845 sizeof(char_u *), help_compare); | |
| 1696 | 6846 /* Delete more than TAG_MANY to reduce the size of the listing. */ |
| 6847 while (*num_matches > TAG_MANY) | |
| 6848 vim_free((*matches)[--*num_matches]); | |
| 6849 } | |
| 7 | 6850 return OK; |
| 6851 } | |
| 6852 | |
| 6853 /* | |
| 6365 | 6854 * Called when starting to edit a buffer for a help file. |
| 6855 */ | |
| 6856 static void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6857 prepare_help_buffer(void) |
| 6365 | 6858 { |
| 6859 char_u *p; | |
| 6860 | |
| 6861 curbuf->b_help = TRUE; | |
| 6862 #ifdef FEAT_QUICKFIX | |
| 6863 set_string_option_direct((char_u *)"buftype", -1, | |
| 6864 (char_u *)"help", OPT_FREE|OPT_LOCAL, 0); | |
| 6865 #endif | |
| 6866 | |
| 6867 /* | |
| 6868 * Always set these options after jumping to a help tag, because the | |
| 6869 * user may have an autocommand that gets in the way. | |
| 6870 * Accept all ASCII chars for keywords, except ' ', '*', '"', '|', and | |
| 6871 * latin1 word characters (for translated help files). | |
| 6872 * Only set it when needed, buf_init_chartab() is some work. | |
| 6873 */ | |
| 6874 p = | |
| 6875 #ifdef EBCDIC | |
| 6876 (char_u *)"65-255,^*,^|,^\""; | |
| 6877 #else | |
| 6878 (char_u *)"!-~,^*,^|,^\",192-255"; | |
| 6879 #endif | |
| 6880 if (STRCMP(curbuf->b_p_isk, p) != 0) | |
| 6881 { | |
| 6882 set_string_option_direct((char_u *)"isk", -1, p, OPT_FREE|OPT_LOCAL, 0); | |
| 6883 check_buf_options(curbuf); | |
| 6884 (void)buf_init_chartab(curbuf, FALSE); | |
| 6885 } | |
| 6886 | |
| 6415 | 6887 #ifdef FEAT_FOLDING |
| 6365 | 6888 /* Don't use the global foldmethod.*/ |
| 6889 set_string_option_direct((char_u *)"fdm", -1, (char_u *)"manual", | |
| 6890 OPT_FREE|OPT_LOCAL, 0); | |
| 6415 | 6891 #endif |
| 6365 | 6892 |
| 6893 curbuf->b_p_ts = 8; /* 'tabstop' is 8 */ | |
| 6894 curwin->w_p_list = FALSE; /* no list mode */ | |
| 6895 | |
| 6896 curbuf->b_p_ma = FALSE; /* not modifiable */ | |
| 6897 curbuf->b_p_bin = FALSE; /* reset 'bin' before reading file */ | |
| 6898 curwin->w_p_nu = 0; /* no line numbers */ | |
| 6899 curwin->w_p_rnu = 0; /* no relative line numbers */ | |
| 6900 RESET_BINDING(curwin); /* no scroll or cursor binding */ | |
| 6901 #ifdef FEAT_ARABIC | |
| 6902 curwin->w_p_arab = FALSE; /* no arabic mode */ | |
| 6903 #endif | |
| 6904 #ifdef FEAT_RIGHTLEFT | |
| 6905 curwin->w_p_rl = FALSE; /* help window is left-to-right */ | |
| 6906 #endif | |
| 6907 #ifdef FEAT_FOLDING | |
| 6908 curwin->w_p_fen = FALSE; /* No folding in the help window */ | |
| 6909 #endif | |
| 6910 #ifdef FEAT_DIFF | |
| 6911 curwin->w_p_diff = FALSE; /* No 'diff' */ | |
| 6912 #endif | |
| 6913 #ifdef FEAT_SPELL | |
| 6914 curwin->w_p_spell = FALSE; /* No spell checking */ | |
| 6915 #endif | |
| 6916 | |
| 6917 set_buflisted(FALSE); | |
| 6918 } | |
| 6919 | |
| 6920 /* | |
| 7 | 6921 * After reading a help file: May cleanup a help buffer when syntax |
| 6922 * highlighting is not used. | |
| 6923 */ | |
| 6924 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
6925 fix_help_buffer(void) |
| 7 | 6926 { |
| 6927 linenr_T lnum; | |
| 6928 char_u *line; | |
| 6929 int in_example = FALSE; | |
| 6930 int len; | |
| 3141 | 6931 char_u *fname; |
| 7 | 6932 char_u *p; |
| 6933 char_u *rt; | |
| 6934 int mustfree; | |
| 6935 | |
|
11533
c83dd5fa40d8
patch 8.0.0649: when opening a help file the filetype is set several times
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
6936 /* Set filetype to "help" if still needed. */ |
|
c83dd5fa40d8
patch 8.0.0649: when opening a help file the filetype is set several times
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
6937 if (STRCMP(curbuf->b_p_ft, "help") != 0) |
|
11589
39787def24bb
patch 8.0.0677: setting 'filetype' may switch buffers
Christian Brabandt <cb@256bit.org>
parents:
11537
diff
changeset
|
6938 { |
|
39787def24bb
patch 8.0.0677: setting 'filetype' may switch buffers
Christian Brabandt <cb@256bit.org>
parents:
11537
diff
changeset
|
6939 ++curbuf_lock; |
|
11533
c83dd5fa40d8
patch 8.0.0649: when opening a help file the filetype is set several times
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
6940 set_option_value((char_u *)"ft", 0L, (char_u *)"help", OPT_LOCAL); |
|
11589
39787def24bb
patch 8.0.0677: setting 'filetype' may switch buffers
Christian Brabandt <cb@256bit.org>
parents:
11537
diff
changeset
|
6941 --curbuf_lock; |
|
39787def24bb
patch 8.0.0677: setting 'filetype' may switch buffers
Christian Brabandt <cb@256bit.org>
parents:
11537
diff
changeset
|
6942 } |
| 7 | 6943 |
| 6944 #ifdef FEAT_SYN_HL | |
|
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2210
diff
changeset
|
6945 if (!syntax_present(curwin)) |
| 7 | 6946 #endif |
| 6947 { | |
| 6948 for (lnum = 1; lnum <= curbuf->b_ml.ml_line_count; ++lnum) | |
| 6949 { | |
| 6950 line = ml_get_buf(curbuf, lnum, FALSE); | |
| 6951 len = (int)STRLEN(line); | |
|
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11127
diff
changeset
|
6952 if (in_example && len > 0 && !VIM_ISWHITE(line[0])) |
| 7 | 6953 { |
| 6954 /* End of example: non-white or '<' in first column. */ | |
| 6955 if (line[0] == '<') | |
| 6956 { | |
| 6957 /* blank-out a '<' in the first column */ | |
| 6958 line = ml_get_buf(curbuf, lnum, TRUE); | |
| 6959 line[0] = ' '; | |
| 6960 } | |
| 6961 in_example = FALSE; | |
| 6962 } | |
| 6963 if (!in_example && len > 0) | |
| 6964 { | |
| 6965 if (line[len - 1] == '>' && (len == 1 || line[len - 2] == ' ')) | |
| 6966 { | |
| 6967 /* blank-out a '>' in the last column (start of example) */ | |
| 6968 line = ml_get_buf(curbuf, lnum, TRUE); | |
| 6969 line[len - 1] = ' '; | |
| 6970 in_example = TRUE; | |
| 6971 } | |
| 6972 else if (line[len - 1] == '~') | |
| 6973 { | |
| 6974 /* blank-out a '~' at the end of line (header marker) */ | |
| 6975 line = ml_get_buf(curbuf, lnum, TRUE); | |
| 6976 line[len - 1] = ' '; | |
| 6977 } | |
| 6978 } | |
| 6979 } | |
| 6980 } | |
| 6981 | |
| 6982 /* | |
| 3141 | 6983 * In the "help.txt" and "help.abx" file, add the locally added help |
| 6984 * files. This uses the very first line in the help file. | |
| 7 | 6985 */ |
| 3141 | 6986 fname = gettail(curbuf->b_fname); |
| 6987 if (fnamecmp(fname, "help.txt") == 0 | |
| 6988 #ifdef FEAT_MULTI_LANG | |
| 6989 || (fnamencmp(fname, "help.", 5) == 0 | |
| 6990 && ASCII_ISALPHA(fname[5]) | |
| 6991 && ASCII_ISALPHA(fname[6]) | |
| 6992 && TOLOWER_ASC(fname[7]) == 'x' | |
| 6993 && fname[8] == NUL) | |
| 6994 #endif | |
| 6995 ) | |
| 7 | 6996 { |
| 6997 for (lnum = 1; lnum < curbuf->b_ml.ml_line_count; ++lnum) | |
| 6998 { | |
| 6999 line = ml_get_buf(curbuf, lnum, FALSE); | |
| 3141 | 7000 if (strstr((char *)line, "*local-additions*") == NULL) |
| 7001 continue; | |
| 7002 | |
| 7003 /* Go through all directories in 'runtimepath', skipping | |
| 7004 * $VIMRUNTIME. */ | |
| 7005 p = p_rtp; | |
| 7006 while (*p != NUL) | |
| 7 | 7007 { |
| 3141 | 7008 copy_option_part(&p, NameBuff, MAXPATHL, ","); |
| 7009 mustfree = FALSE; | |
| 7010 rt = vim_getenv((char_u *)"VIMRUNTIME", &mustfree); | |
|
13276
6958e700a458
patch 8.0.1512: warning for possibly using NULL pointer
Christian Brabandt <cb@256bit.org>
parents:
13268
diff
changeset
|
7011 if (rt != NULL && fullpathcmp(rt, NameBuff, FALSE) != FPC_SAME) |
| 7 | 7012 { |
| 3141 | 7013 int fcount; |
| 7014 char_u **fnames; | |
| 7015 FILE *fd; | |
| 7016 char_u *s; | |
| 7017 int fi; | |
| 7 | 7018 #ifdef FEAT_MBYTE |
| 3141 | 7019 vimconv_T vc; |
| 7020 char_u *cp; | |
| 7021 #endif | |
| 7022 | |
| 7023 /* Find all "doc/ *.txt" files in this directory. */ | |
| 7024 add_pathsep(NameBuff); | |
| 7025 #ifdef FEAT_MULTI_LANG | |
| 7026 STRCAT(NameBuff, "doc/*.??[tx]"); | |
| 7 | 7027 #else |
| 3141 | 7028 STRCAT(NameBuff, "doc/*.txt"); |
| 7029 #endif | |
| 7030 if (gen_expand_wildcards(1, &NameBuff, &fcount, | |
| 7031 &fnames, EW_FILE|EW_SILENT) == OK | |
| 7032 && fcount > 0) | |
| 7033 { | |
| 7034 #ifdef FEAT_MULTI_LANG | |
|
13014
e1deb00ffc27
patch 8.0.1383: local additions in help skips some files
Christian Brabandt <cb@256bit.org>
parents:
13012
diff
changeset
|
7035 int i1, i2; |
|
e1deb00ffc27
patch 8.0.1383: local additions in help skips some files
Christian Brabandt <cb@256bit.org>
parents:
13012
diff
changeset
|
7036 char_u *f1, *f2; |
|
e1deb00ffc27
patch 8.0.1383: local additions in help skips some files
Christian Brabandt <cb@256bit.org>
parents:
13012
diff
changeset
|
7037 char_u *t1, *t2; |
|
e1deb00ffc27
patch 8.0.1383: local additions in help skips some files
Christian Brabandt <cb@256bit.org>
parents:
13012
diff
changeset
|
7038 char_u *e1, *e2; |
| 3141 | 7039 |
| 7040 /* If foo.abx is found use it instead of foo.txt in | |
| 7041 * the same directory. */ | |
| 7042 for (i1 = 0; i1 < fcount; ++i1) | |
| 7043 { | |
| 7044 for (i2 = 0; i2 < fcount; ++i2) | |
| 7045 { | |
| 7046 if (i1 == i2) | |
| 7047 continue; | |
| 7048 if (fnames[i1] == NULL || fnames[i2] == NULL) | |
| 7049 continue; | |
| 7050 f1 = fnames[i1]; | |
| 7051 f2 = fnames[i2]; | |
| 7052 t1 = gettail(f1); | |
|
13014
e1deb00ffc27
patch 8.0.1383: local additions in help skips some files
Christian Brabandt <cb@256bit.org>
parents:
13012
diff
changeset
|
7053 t2 = gettail(f2); |
| 3141 | 7054 e1 = vim_strrchr(t1, '.'); |
|
13014
e1deb00ffc27
patch 8.0.1383: local additions in help skips some files
Christian Brabandt <cb@256bit.org>
parents:
13012
diff
changeset
|
7055 e2 = vim_strrchr(t2, '.'); |
|
10299
7b2f95633e28
commit https://github.com/vim/vim/commit/7756e7465d627ff9cd01e59625484a8c302ef853
Christian Brabandt <cb@256bit.org>
parents:
10264
diff
changeset
|
7056 if (e1 == NULL || e2 == NULL) |
| 3141 | 7057 continue; |
| 7058 if (fnamecmp(e1, ".txt") != 0 | |
| 7059 && fnamecmp(e1, fname + 4) != 0) | |
| 7060 { | |
| 7061 /* Not .txt and not .abx, remove it. */ | |
|
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13174
diff
changeset
|
7062 VIM_CLEAR(fnames[i1]); |
| 3141 | 7063 continue; |
| 7064 } | |
|
13014
e1deb00ffc27
patch 8.0.1383: local additions in help skips some files
Christian Brabandt <cb@256bit.org>
parents:
13012
diff
changeset
|
7065 if (e1 - f1 != e2 - f2 |
|
e1deb00ffc27
patch 8.0.1383: local additions in help skips some files
Christian Brabandt <cb@256bit.org>
parents:
13012
diff
changeset
|
7066 || fnamencmp(f1, f2, e1 - f1) != 0) |
| 3141 | 7067 continue; |
| 7068 if (fnamecmp(e1, ".txt") == 0 | |
| 7069 && fnamecmp(e2, fname + 4) == 0) | |
| 7070 /* use .abx instead of .txt */ | |
|
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13174
diff
changeset
|
7071 VIM_CLEAR(fnames[i1]); |
| 7 | 7072 } |
| 7073 } | |
| 3141 | 7074 #endif |
| 7075 for (fi = 0; fi < fcount; ++fi) | |
| 7076 { | |
| 7077 if (fnames[fi] == NULL) | |
| 7078 continue; | |
| 7079 fd = mch_fopen((char *)fnames[fi], "r"); | |
| 7080 if (fd != NULL) | |
| 7081 { | |
| 7082 vim_fgets(IObuff, IOSIZE, fd); | |
| 7083 if (IObuff[0] == '*' | |
| 7084 && (s = vim_strchr(IObuff + 1, '*')) | |
| 7085 != NULL) | |
| 7086 { | |
| 7087 #ifdef FEAT_MBYTE | |
| 7088 int this_utf = MAYBE; | |
| 7089 #endif | |
| 7090 /* Change tag definition to a | |
| 7091 * reference and remove <CR>/<NL>. */ | |
| 7092 IObuff[0] = '|'; | |
| 7093 *s = '|'; | |
| 7094 while (*s != NUL) | |
| 7095 { | |
| 7096 if (*s == '\r' || *s == '\n') | |
| 7097 *s = NUL; | |
| 7098 #ifdef FEAT_MBYTE | |
| 7099 /* The text is utf-8 when a byte | |
| 7100 * above 127 is found and no | |
| 7101 * illegal byte sequence is found. | |
| 7102 */ | |
| 7103 if (*s >= 0x80 && this_utf != FALSE) | |
| 7104 { | |
| 7105 int l; | |
| 7106 | |
| 7107 this_utf = TRUE; | |
| 7108 l = utf_ptr2len(s); | |
| 7109 if (l == 1) | |
| 7110 this_utf = FALSE; | |
| 7111 s += l - 1; | |
| 7112 } | |
| 7113 #endif | |
| 7114 ++s; | |
| 7115 } | |
| 7116 #ifdef FEAT_MBYTE | |
| 7117 /* The help file is latin1 or utf-8; | |
| 7118 * conversion to the current | |
| 7119 * 'encoding' may be required. */ | |
| 7120 vc.vc_type = CONV_NONE; | |
| 7121 convert_setup(&vc, (char_u *)( | |
| 7122 this_utf == TRUE ? "utf-8" | |
| 7123 : "latin1"), p_enc); | |
| 7124 if (vc.vc_type == CONV_NONE) | |
| 7125 /* No conversion needed. */ | |
| 7126 cp = IObuff; | |
| 7127 else | |
| 7128 { | |
| 7129 /* Do the conversion. If it fails | |
| 7130 * use the unconverted text. */ | |
| 7131 cp = string_convert(&vc, IObuff, | |
| 7132 NULL); | |
| 7133 if (cp == NULL) | |
| 7134 cp = IObuff; | |
| 7135 } | |
| 7136 convert_setup(&vc, NULL, NULL); | |
| 7137 | |
| 7138 ml_append(lnum, cp, (colnr_T)0, FALSE); | |
| 7139 if (cp != IObuff) | |
| 7140 vim_free(cp); | |
| 7141 #else | |
| 7142 ml_append(lnum, IObuff, (colnr_T)0, | |
| 7143 FALSE); | |
| 7144 #endif | |
| 7145 ++lnum; | |
| 7146 } | |
| 7147 fclose(fd); | |
| 7148 } | |
| 7149 } | |
| 7150 FreeWild(fcount, fnames); | |
| 7 | 7151 } |
| 7152 } | |
| 3141 | 7153 if (mustfree) |
| 7154 vim_free(rt); | |
| 7 | 7155 } |
| 3141 | 7156 break; |
| 7 | 7157 } |
| 7158 } | |
| 7159 } | |
| 7160 | |
| 40 | 7161 /* |
| 7162 * ":exusage" | |
| 7163 */ | |
| 7164 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7165 ex_exusage(exarg_T *eap UNUSED) |
| 40 | 7166 { |
| 7167 do_cmdline_cmd((char_u *)"help ex-cmd-index"); | |
| 7168 } | |
| 7169 | |
| 7170 /* | |
| 7171 * ":viusage" | |
| 7172 */ | |
| 7173 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7174 ex_viusage(exarg_T *eap UNUSED) |
| 40 | 7175 { |
| 7176 do_cmdline_cmd((char_u *)"help normal-index"); | |
| 7177 } | |
| 7178 | |
| 7 | 7179 /* |
|
8522
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7180 * Generate tags in one help directory. |
| 7 | 7181 */ |
| 7182 static void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7183 helptags_one( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7184 char_u *dir, /* doc directory */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7185 char_u *ext, /* suffix, ".txt", ".itx", ".frx", etc. */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7186 char_u *tagfname, /* "tags" for English, "tags-fr" for French. */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7187 int add_help_tags) /* add "help-tags" tag */ |
| 7 | 7188 { |
| 7189 FILE *fd_tags; | |
| 7190 FILE *fd; | |
| 7191 garray_T ga; | |
| 7192 int filecount; | |
| 7193 char_u **files; | |
| 7194 char_u *p1, *p2; | |
| 7195 int fi; | |
| 7196 char_u *s; | |
| 7197 int i; | |
| 7198 char_u *fname; | |
| 3957 | 7199 int dirlen; |
| 7 | 7200 # ifdef FEAT_MBYTE |
| 7201 int utf8 = MAYBE; | |
| 7202 int this_utf8; | |
| 7203 int firstline; | |
| 7204 int mix = FALSE; /* detected mixed encodings */ | |
| 7205 # endif | |
| 7206 | |
| 7207 /* | |
| 7208 * Find all *.txt files. | |
| 7209 */ | |
| 3978 | 7210 dirlen = (int)STRLEN(dir); |
| 7 | 7211 STRCPY(NameBuff, dir); |
| 3957 | 7212 STRCAT(NameBuff, "/**/*"); |
| 7 | 7213 STRCAT(NameBuff, ext); |
| 7214 if (gen_expand_wildcards(1, &NameBuff, &filecount, &files, | |
| 7215 EW_FILE|EW_SILENT) == FAIL | |
| 7216 || filecount == 0) | |
| 7217 { | |
| 7218 if (!got_int) | |
|
9953
9560a2eb7968
commit https://github.com/vim/vim/commit/5b30291785e6b9be1a607504c14bd03c601b59a6
Christian Brabandt <cb@256bit.org>
parents:
9947
diff
changeset
|
7219 EMSG2(_("E151: No match: %s"), NameBuff); |
| 7 | 7220 return; |
| 7221 } | |
| 7222 | |
| 7223 /* | |
| 7224 * Open the tags file for writing. | |
| 7225 * Do this before scanning through all the files. | |
| 7226 */ | |
| 7227 STRCPY(NameBuff, dir); | |
| 7228 add_pathsep(NameBuff); | |
| 7229 STRCAT(NameBuff, tagfname); | |
| 531 | 7230 fd_tags = mch_fopen((char *)NameBuff, "w"); |
| 7 | 7231 if (fd_tags == NULL) |
| 7232 { | |
| 7233 EMSG2(_("E152: Cannot open %s for writing"), NameBuff); | |
| 7234 FreeWild(filecount, files); | |
| 7235 return; | |
| 7236 } | |
| 7237 | |
| 7238 /* | |
| 1502 | 7239 * If using the "++t" argument or generating tags for "$VIMRUNTIME/doc" |
| 7240 * add the "help-tags" tag. | |
| 7 | 7241 */ |
| 7242 ga_init2(&ga, (int)sizeof(char_u *), 100); | |
| 1502 | 7243 if (add_help_tags || fullpathcmp((char_u *)"$VIMRUNTIME/doc", |
| 7244 dir, FALSE) == FPC_SAME) | |
| 7 | 7245 { |
| 7246 if (ga_grow(&ga, 1) == FAIL) | |
| 7247 got_int = TRUE; | |
| 7248 else | |
| 7249 { | |
| 835 | 7250 s = alloc(18 + (unsigned)STRLEN(tagfname)); |
| 7 | 7251 if (s == NULL) |
| 7252 got_int = TRUE; | |
| 7253 else | |
| 7254 { | |
| 7255 sprintf((char *)s, "help-tags\t%s\t1\n", tagfname); | |
| 7256 ((char_u **)ga.ga_data)[ga.ga_len] = s; | |
| 7257 ++ga.ga_len; | |
| 7258 } | |
| 7259 } | |
| 7260 } | |
| 7261 | |
| 7262 /* | |
| 7263 * Go over all the files and extract the tags. | |
| 7264 */ | |
| 7265 for (fi = 0; fi < filecount && !got_int; ++fi) | |
| 7266 { | |
| 531 | 7267 fd = mch_fopen((char *)files[fi], "r"); |
| 7 | 7268 if (fd == NULL) |
| 7269 { | |
| 7270 EMSG2(_("E153: Unable to open %s for reading"), files[fi]); | |
| 7271 continue; | |
| 7272 } | |
| 3957 | 7273 fname = files[fi] + dirlen + 1; |
| 7 | 7274 |
| 7275 # ifdef FEAT_MBYTE | |
| 7276 firstline = TRUE; | |
| 7277 # endif | |
| 7278 while (!vim_fgets(IObuff, IOSIZE, fd) && !got_int) | |
| 7279 { | |
| 7280 # ifdef FEAT_MBYTE | |
| 7281 if (firstline) | |
| 7282 { | |
| 7283 /* Detect utf-8 file by a non-ASCII char in the first line. */ | |
| 7284 this_utf8 = MAYBE; | |
| 7285 for (s = IObuff; *s != NUL; ++s) | |
| 7286 if (*s >= 0x80) | |
| 7287 { | |
| 7288 int l; | |
| 7289 | |
| 7290 this_utf8 = TRUE; | |
| 474 | 7291 l = utf_ptr2len(s); |
| 7 | 7292 if (l == 1) |
| 7293 { | |
| 7294 /* Illegal UTF-8 byte sequence. */ | |
| 7295 this_utf8 = FALSE; | |
| 7296 break; | |
| 7297 } | |
| 7298 s += l - 1; | |
| 7299 } | |
| 7300 if (this_utf8 == MAYBE) /* only ASCII characters found */ | |
| 7301 this_utf8 = FALSE; | |
| 7302 if (utf8 == MAYBE) /* first file */ | |
| 7303 utf8 = this_utf8; | |
| 7304 else if (utf8 != this_utf8) | |
| 7305 { | |
| 7306 EMSG2(_("E670: Mix of help file encodings within a language: %s"), files[fi]); | |
| 7307 mix = !got_int; | |
| 7308 got_int = TRUE; | |
| 7309 } | |
| 7310 firstline = FALSE; | |
| 7311 } | |
| 7312 # endif | |
| 7313 p1 = vim_strchr(IObuff, '*'); /* find first '*' */ | |
| 7314 while (p1 != NULL) | |
| 7315 { | |
| 3514 | 7316 /* Use vim_strbyte() instead of vim_strchr() so that when |
| 7317 * 'encoding' is dbcs it still works, don't find '*' in the | |
| 7318 * second byte. */ | |
| 7319 p2 = vim_strbyte(p1 + 1, '*'); /* find second '*' */ | |
| 7 | 7320 if (p2 != NULL && p2 > p1 + 1) /* skip "*" and "**" */ |
| 7321 { | |
| 7322 for (s = p1 + 1; s < p2; ++s) | |
| 7323 if (*s == ' ' || *s == '\t' || *s == '|') | |
| 7324 break; | |
| 7325 | |
| 7326 /* | |
| 7327 * Only accept a *tag* when it consists of valid | |
| 7328 * characters, there is white space before it and is | |
| 7329 * followed by a white character or end-of-line. | |
| 7330 */ | |
| 7331 if (s == p2 | |
| 7332 && (p1 == IObuff || p1[-1] == ' ' || p1[-1] == '\t') | |
| 7333 && (vim_strchr((char_u *)" \t\n\r", s[1]) != NULL | |
| 7334 || s[1] == '\0')) | |
| 7335 { | |
| 7336 *p2 = '\0'; | |
| 7337 ++p1; | |
| 7338 if (ga_grow(&ga, 1) == FAIL) | |
| 7339 { | |
| 7340 got_int = TRUE; | |
| 7341 break; | |
| 7342 } | |
| 7343 s = alloc((unsigned)(p2 - p1 + STRLEN(fname) + 2)); | |
| 7344 if (s == NULL) | |
| 7345 { | |
| 7346 got_int = TRUE; | |
| 7347 break; | |
| 7348 } | |
| 7349 ((char_u **)ga.ga_data)[ga.ga_len] = s; | |
| 7350 ++ga.ga_len; | |
| 7351 sprintf((char *)s, "%s\t%s", p1, fname); | |
| 7352 | |
| 7353 /* find next '*' */ | |
| 7354 p2 = vim_strchr(p2 + 1, '*'); | |
| 7355 } | |
| 7356 } | |
| 7357 p1 = p2; | |
| 7358 } | |
| 7359 line_breakcheck(); | |
| 7360 } | |
| 7361 | |
| 7362 fclose(fd); | |
| 7363 } | |
| 7364 | |
| 7365 FreeWild(filecount, files); | |
| 7366 | |
| 7367 if (!got_int) | |
| 7368 { | |
| 7369 /* | |
| 7370 * Sort the tags. | |
| 7371 */ | |
| 7009 | 7372 if (ga.ga_data != NULL) |
| 7373 sort_strings((char_u **)ga.ga_data, ga.ga_len); | |
| 7 | 7374 |
| 7375 /* | |
| 7376 * Check for duplicates. | |
| 7377 */ | |
| 7378 for (i = 1; i < ga.ga_len; ++i) | |
| 7379 { | |
| 7380 p1 = ((char_u **)ga.ga_data)[i - 1]; | |
| 7381 p2 = ((char_u **)ga.ga_data)[i]; | |
| 7382 while (*p1 == *p2) | |
| 7383 { | |
| 7384 if (*p2 == '\t') | |
| 7385 { | |
| 7386 *p2 = NUL; | |
| 274 | 7387 vim_snprintf((char *)NameBuff, MAXPATHL, |
| 7 | 7388 _("E154: Duplicate tag \"%s\" in file %s/%s"), |
| 7389 ((char_u **)ga.ga_data)[i], dir, p2 + 1); | |
| 7390 EMSG(NameBuff); | |
| 7391 *p2 = '\t'; | |
| 7392 break; | |
| 7393 } | |
| 7394 ++p1; | |
| 7395 ++p2; | |
| 7396 } | |
| 7397 } | |
| 7398 | |
| 7399 # ifdef FEAT_MBYTE | |
| 7400 if (utf8 == TRUE) | |
| 7401 fprintf(fd_tags, "!_TAG_FILE_ENCODING\tutf-8\t//\n"); | |
| 7402 # endif | |
| 7403 | |
| 7404 /* | |
| 7405 * Write the tags into the file. | |
| 7406 */ | |
| 7407 for (i = 0; i < ga.ga_len; ++i) | |
| 7408 { | |
| 7409 s = ((char_u **)ga.ga_data)[i]; | |
| 1325 | 7410 if (STRNCMP(s, "help-tags\t", 10) == 0) |
| 7 | 7411 /* help-tags entry was added in formatted form */ |
| 1325 | 7412 fputs((char *)s, fd_tags); |
| 7 | 7413 else |
| 7414 { | |
| 7415 fprintf(fd_tags, "%s\t/*", s); | |
| 7416 for (p1 = s; *p1 != '\t'; ++p1) | |
| 7417 { | |
| 7418 /* insert backslash before '\\' and '/' */ | |
| 7419 if (*p1 == '\\' || *p1 == '/') | |
| 7420 putc('\\', fd_tags); | |
| 7421 putc(*p1, fd_tags); | |
| 7422 } | |
| 7423 fprintf(fd_tags, "*\n"); | |
| 7424 } | |
| 7425 } | |
| 7426 } | |
| 7427 #ifdef FEAT_MBYTE | |
| 7428 if (mix) | |
| 7429 got_int = FALSE; /* continue with other languages */ | |
| 7430 #endif | |
| 7431 | |
| 7432 for (i = 0; i < ga.ga_len; ++i) | |
| 7433 vim_free(((char_u **)ga.ga_data)[i]); | |
| 7434 ga_clear(&ga); | |
| 7435 fclose(fd_tags); /* there is no check for an error... */ | |
| 7436 } | |
| 7437 | |
|
8522
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7438 /* |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7439 * Generate tags in one help directory, taking care of translations. |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7440 */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7441 static void |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7442 do_helptags(char_u *dirname, int add_help_tags) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7443 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7444 #ifdef FEAT_MULTI_LANG |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7445 int len; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7446 int i, j; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7447 garray_T ga; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7448 char_u lang[2]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7449 char_u ext[5]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7450 char_u fname[8]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7451 int filecount; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7452 char_u **files; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7453 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7454 /* Get a list of all files in the help directory and in subdirectories. */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7455 STRCPY(NameBuff, dirname); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7456 add_pathsep(NameBuff); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7457 STRCAT(NameBuff, "**"); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7458 if (gen_expand_wildcards(1, &NameBuff, &filecount, &files, |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7459 EW_FILE|EW_SILENT) == FAIL |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7460 || filecount == 0) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7461 { |
|
9953
9560a2eb7968
commit https://github.com/vim/vim/commit/5b30291785e6b9be1a607504c14bd03c601b59a6
Christian Brabandt <cb@256bit.org>
parents:
9947
diff
changeset
|
7462 EMSG2(_("E151: No match: %s"), NameBuff); |
|
8522
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7463 return; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7464 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7465 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7466 /* Go over all files in the directory to find out what languages are |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7467 * present. */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7468 ga_init2(&ga, 1, 10); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7469 for (i = 0; i < filecount; ++i) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7470 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7471 len = (int)STRLEN(files[i]); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7472 if (len > 4) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7473 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7474 if (STRICMP(files[i] + len - 4, ".txt") == 0) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7475 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7476 /* ".txt" -> language "en" */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7477 lang[0] = 'e'; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7478 lang[1] = 'n'; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7479 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7480 else if (files[i][len - 4] == '.' |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7481 && ASCII_ISALPHA(files[i][len - 3]) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7482 && ASCII_ISALPHA(files[i][len - 2]) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7483 && TOLOWER_ASC(files[i][len - 1]) == 'x') |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7484 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7485 /* ".abx" -> language "ab" */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7486 lang[0] = TOLOWER_ASC(files[i][len - 3]); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7487 lang[1] = TOLOWER_ASC(files[i][len - 2]); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7488 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7489 else |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7490 continue; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7491 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7492 /* Did we find this language already? */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7493 for (j = 0; j < ga.ga_len; j += 2) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7494 if (STRNCMP(lang, ((char_u *)ga.ga_data) + j, 2) == 0) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7495 break; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7496 if (j == ga.ga_len) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7497 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7498 /* New language, add it. */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7499 if (ga_grow(&ga, 2) == FAIL) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7500 break; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7501 ((char_u *)ga.ga_data)[ga.ga_len++] = lang[0]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7502 ((char_u *)ga.ga_data)[ga.ga_len++] = lang[1]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7503 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7504 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7505 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7506 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7507 /* |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7508 * Loop over the found languages to generate a tags file for each one. |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7509 */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7510 for (j = 0; j < ga.ga_len; j += 2) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7511 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7512 STRCPY(fname, "tags-xx"); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7513 fname[5] = ((char_u *)ga.ga_data)[j]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7514 fname[6] = ((char_u *)ga.ga_data)[j + 1]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7515 if (fname[5] == 'e' && fname[6] == 'n') |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7516 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7517 /* English is an exception: use ".txt" and "tags". */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7518 fname[4] = NUL; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7519 STRCPY(ext, ".txt"); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7520 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7521 else |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7522 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7523 /* Language "ab" uses ".abx" and "tags-ab". */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7524 STRCPY(ext, ".xxx"); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7525 ext[1] = fname[5]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7526 ext[2] = fname[6]; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7527 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7528 helptags_one(dirname, ext, fname, add_help_tags); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7529 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7530 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7531 ga_clear(&ga); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7532 FreeWild(filecount, files); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7533 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7534 #else |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7535 /* No language support, just use "*.txt" and "tags". */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7536 helptags_one(dirname, (char_u *)".txt", (char_u *)"tags", add_help_tags); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7537 #endif |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7538 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7539 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7540 static void |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7541 helptags_cb(char_u *fname, void *cookie) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7542 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7543 do_helptags(fname, *(int *)cookie); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7544 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7545 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7546 /* |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7547 * ":helptags" |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7548 */ |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7549 void |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7550 ex_helptags(exarg_T *eap) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7551 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7552 expand_T xpc; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7553 char_u *dirname; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7554 int add_help_tags = FALSE; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7555 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7556 /* Check for ":helptags ++t {dir}". */ |
|
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11127
diff
changeset
|
7557 if (STRNCMP(eap->arg, "++t", 3) == 0 && VIM_ISWHITE(eap->arg[3])) |
|
8522
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7558 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7559 add_help_tags = TRUE; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7560 eap->arg = skipwhite(eap->arg + 3); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7561 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7562 |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7563 if (STRCMP(eap->arg, "ALL") == 0) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7564 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7565 do_in_path(p_rtp, (char_u *)"doc", DIP_ALL + DIP_DIR, |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7566 helptags_cb, &add_help_tags); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7567 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7568 else |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7569 { |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7570 ExpandInit(&xpc); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7571 xpc.xp_context = EXPAND_DIRECTORIES; |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7572 dirname = ExpandOne(&xpc, eap->arg, NULL, |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7573 WILD_LIST_NOTFOUND|WILD_SILENT, WILD_EXPAND_FREE); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7574 if (dirname == NULL || !mch_isdir(dirname)) |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7575 EMSG2(_("E150: Not a directory: %s"), eap->arg); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7576 else |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7577 do_helptags(dirname, add_help_tags); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7578 vim_free(dirname); |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7579 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7580 } |
|
721e8d6cb7b5
commit https://github.com/vim/vim/commit/6bef5306e4f2cacb3a93667992c2312d4b293c9d
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
7581 |
| 7 | 7582 #if defined(FEAT_SIGNS) || defined(PROTO) |
| 7583 | |
| 7584 /* | |
| 7585 * Struct to hold the sign properties. | |
| 7586 */ | |
| 7587 typedef struct sign sign_T; | |
| 7588 | |
| 7589 struct sign | |
| 7590 { | |
| 7591 sign_T *sn_next; /* next sign in list */ | |
| 2606 | 7592 int sn_typenr; /* type number of sign */ |
| 7 | 7593 char_u *sn_name; /* name of sign */ |
| 7594 char_u *sn_icon; /* name of pixmap */ | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7595 # ifdef FEAT_SIGN_ICONS |
| 7 | 7596 void *sn_image; /* icon image */ |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7597 # endif |
| 7 | 7598 char_u *sn_text; /* text used instead of pixmap */ |
| 7599 int sn_line_hl; /* highlight ID for line */ | |
| 7600 int sn_text_hl; /* highlight ID for text */ | |
| 7601 }; | |
| 7602 | |
| 7603 static sign_T *first_sign = NULL; | |
| 2605 | 7604 static int next_sign_typenr = 1; |
| 7 | 7605 |
|
7799
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
7606 static void sign_list_defined(sign_T *sp); |
|
af3c41a3c53f
commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a
Christian Brabandt <cb@256bit.org>
parents:
7691
diff
changeset
|
7607 static void sign_undefine(sign_T *sp, sign_T *sp_prev); |
| 7 | 7608 |
| 1868 | 7609 static char *cmds[] = { |
| 7610 "define", | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7611 # define SIGNCMD_DEFINE 0 |
| 1868 | 7612 "undefine", |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7613 # define SIGNCMD_UNDEFINE 1 |
| 1868 | 7614 "list", |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7615 # define SIGNCMD_LIST 2 |
| 1868 | 7616 "place", |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7617 # define SIGNCMD_PLACE 3 |
| 1868 | 7618 "unplace", |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7619 # define SIGNCMD_UNPLACE 4 |
| 1868 | 7620 "jump", |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7621 # define SIGNCMD_JUMP 5 |
| 1868 | 7622 NULL |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
7623 # define SIGNCMD_LAST 6 |
| 1868 | 7624 }; |
| 7625 | |
| 7626 /* | |
| 7627 * Find index of a ":sign" subcmd from its name. | |
| 7628 * "*end_cmd" must be writable. | |
| 7629 */ | |
| 7630 static int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7631 sign_cmd_idx( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7632 char_u *begin_cmd, /* begin of sign subcmd */ |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7633 char_u *end_cmd) /* just after sign subcmd */ |
| 1868 | 7634 { |
| 7635 int idx; | |
| 7636 char save = *end_cmd; | |
| 7637 | |
| 7638 *end_cmd = NUL; | |
| 7639 for (idx = 0; ; ++idx) | |
| 7640 if (cmds[idx] == NULL || STRCMP(begin_cmd, cmds[idx]) == 0) | |
| 7641 break; | |
| 7642 *end_cmd = save; | |
| 7643 return idx; | |
| 7644 } | |
| 7645 | |
| 7 | 7646 /* |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7647 * Find a sign by name. Also returns pointer to the previous sign. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7648 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7649 static sign_T * |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7650 sign_find(char_u *name, sign_T **sp_prev) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7651 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7652 sign_T *sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7653 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7654 if (sp_prev != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7655 *sp_prev = NULL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7656 for (sp = first_sign; sp != NULL; sp = sp->sn_next) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7657 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7658 if (STRCMP(sp->sn_name, name) == 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7659 break; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7660 if (sp_prev != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7661 *sp_prev = sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7662 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7663 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7664 return sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7665 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7666 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7667 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7668 * Define a new sign or update an existing sign |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7669 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7670 int |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7671 sign_define_by_name( |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7672 char_u *name, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7673 char_u *icon, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7674 char_u *linehl, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7675 char_u *text, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7676 char_u *texthl) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7677 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7678 sign_T *sp_prev; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7679 sign_T *sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7680 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7681 sp = sign_find(name, &sp_prev); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7682 if (sp == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7683 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7684 sign_T *lp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7685 int start = next_sign_typenr; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7686 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7687 // Allocate a new sign. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7688 sp = (sign_T *)alloc_clear_id((unsigned)sizeof(sign_T), |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7689 aid_sign_define_by_name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7690 if (sp == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7691 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7692 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7693 // Check that next_sign_typenr is not already being used. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7694 // This only happens after wrapping around. Hopefully |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7695 // another one got deleted and we can use its number. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7696 for (lp = first_sign; lp != NULL; ) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7697 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7698 if (lp->sn_typenr == next_sign_typenr) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7699 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7700 ++next_sign_typenr; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7701 if (next_sign_typenr == MAX_TYPENR) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7702 next_sign_typenr = 1; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7703 if (next_sign_typenr == start) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7704 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7705 vim_free(sp); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7706 EMSG(_("E612: Too many signs defined")); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7707 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7708 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7709 lp = first_sign; // start all over |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7710 continue; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7711 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7712 lp = lp->sn_next; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7713 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7714 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7715 sp->sn_typenr = next_sign_typenr; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7716 if (++next_sign_typenr == MAX_TYPENR) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7717 next_sign_typenr = 1; // wrap around |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7718 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7719 sp->sn_name = vim_strsave(name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7720 if (sp->sn_name == NULL) // out of memory |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7721 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7722 vim_free(sp); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7723 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7724 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7725 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7726 // add the new sign to the list of signs |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7727 if (sp_prev == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7728 first_sign = sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7729 else |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7730 sp_prev->sn_next = sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7731 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7732 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7733 // set values for a defined sign. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7734 if (icon != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7735 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7736 vim_free(sp->sn_icon); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7737 sp->sn_icon = vim_strsave(icon); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7738 backslash_halve(sp->sn_icon); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7739 # ifdef FEAT_SIGN_ICONS |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7740 if (gui.in_use) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7741 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7742 out_flush(); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7743 if (sp->sn_image != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7744 gui_mch_destroy_sign(sp->sn_image); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7745 sp->sn_image = gui_mch_register_sign(sp->sn_icon); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7746 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7747 # endif |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7748 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7749 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7750 if (text != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7751 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7752 char_u *s; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7753 char_u *endp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7754 int cells; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7755 int len; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7756 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7757 endp = text + (int)STRLEN(text); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7758 for (s = text; s + 1 < endp; ++s) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7759 if (*s == '\\') |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7760 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7761 // Remove a backslash, so that it is possible |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7762 // to use a space. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7763 STRMOVE(s, s + 1); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7764 --endp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7765 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7766 # ifdef FEAT_MBYTE |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7767 // Count cells and check for non-printable chars |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7768 if (has_mbyte) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7769 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7770 cells = 0; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7771 for (s = text; s < endp; s += (*mb_ptr2len)(s)) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7772 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7773 if (!vim_isprintc((*mb_ptr2char)(s))) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7774 break; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7775 cells += (*mb_ptr2cells)(s); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7776 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7777 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7778 else |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7779 # endif |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7780 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7781 for (s = text; s < endp; ++s) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7782 if (!vim_isprintc(*s)) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7783 break; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7784 cells = (int)(s - text); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7785 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7786 // Currently must be one or two display cells |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7787 if (s != endp || cells < 1 || cells > 2) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7788 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7789 EMSG2(_("E239: Invalid sign text: %s"), text); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7790 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7791 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7792 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7793 vim_free(sp->sn_text); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7794 // Allocate one byte more if we need to pad up |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7795 // with a space. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7796 len = (int)(endp - text + ((cells == 1) ? 1 : 0)); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7797 sp->sn_text = vim_strnsave(text, len); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7798 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7799 if (sp->sn_text != NULL && cells == 1) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7800 STRCPY(sp->sn_text + len - 1, " "); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7801 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7802 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7803 if (linehl != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7804 sp->sn_line_hl = syn_check_group(linehl, (int)STRLEN(linehl)); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7805 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7806 if (texthl != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7807 sp->sn_text_hl = syn_check_group(texthl, (int)STRLEN(texthl)); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7808 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7809 return OK; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7810 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7811 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7812 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7813 * Free the sign specified by 'name'. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7814 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7815 int |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7816 sign_undefine_by_name(char_u *name) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7817 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7818 sign_T *sp_prev; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7819 sign_T *sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7820 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7821 sp = sign_find(name, &sp_prev); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7822 if (sp == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7823 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7824 EMSG2(_("E155: Unknown sign: %s"), name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7825 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7826 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7827 sign_undefine(sp, sp_prev); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7828 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7829 return OK; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7830 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7831 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7832 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7833 * List the signs matching 'name' |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7834 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7835 static void |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7836 sign_list_by_name(char_u *name) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7837 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7838 sign_T *sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7839 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7840 sp = sign_find(name, NULL); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7841 if (sp != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7842 sign_list_defined(sp); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7843 else |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7844 EMSG2(_("E155: Unknown sign: %s"), name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7845 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7846 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7847 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7848 * Place a sign at the specifed file location or update a sign. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7849 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7850 int |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7851 sign_place( |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7852 int *sign_id, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7853 char_u *sign_group, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7854 char_u *sign_name, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7855 buf_T *buf, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7856 linenr_T lnum, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7857 int prio) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7858 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7859 sign_T *sp; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7860 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7861 // Check for reserved character '*' in group name |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7862 if (sign_group != NULL && (*sign_group == '*' || *sign_group == '\0')) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7863 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7864 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7865 for (sp = first_sign; sp != NULL; sp = sp->sn_next) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7866 if (STRCMP(sp->sn_name, sign_name) == 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7867 break; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7868 if (sp == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7869 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7870 EMSG2(_("E155: Unknown sign: %s"), sign_name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7871 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7872 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7873 if (*sign_id == 0) |
|
15271
a6319aca721b
patch 8.1.0644: finding next sign ID is inefficient
Bram Moolenaar <Bram@vim.org>
parents:
15247
diff
changeset
|
7874 *sign_id = sign_group_get_next_signid(buf, sign_group); |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7875 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7876 if (lnum > 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7877 // ":sign place {id} line={lnum} name={name} file={fname}": |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7878 // place a sign |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7879 buf_addsign(buf, *sign_id, sign_group, prio, lnum, sp->sn_typenr); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7880 else |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7881 // ":sign place {id} file={fname}": change sign type |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7882 lnum = buf_change_sign_type(buf, *sign_id, sign_group, sp->sn_typenr); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7883 if (lnum > 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7884 update_debug_sign(buf, lnum); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7885 else |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7886 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7887 EMSG2(_("E885: Not possible to change sign %s"), sign_name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7888 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7889 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7890 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7891 return OK; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7892 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7893 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7894 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7895 * Unplace the specified sign |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7896 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7897 int |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7898 sign_unplace(int sign_id, char_u *sign_group, buf_T *buf, linenr_T atlnum) |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7899 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7900 if (sign_id == 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7901 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7902 // Delete all the signs in the specified buffer |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7903 redraw_buf_later(buf, NOT_VALID); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7904 buf_delete_signs(buf, sign_group); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7905 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7906 else |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7907 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7908 linenr_T lnum; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7909 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7910 // Delete only the specified signs |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7911 lnum = buf_delsign(buf, atlnum, sign_id, sign_group); |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7912 if (lnum == 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7913 return FAIL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7914 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7915 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7916 return OK; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7917 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7918 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7919 /* |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7920 * Unplace the sign at the current cursor line. |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7921 */ |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7922 static void |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7923 sign_unplace_at_cursor(char_u *groupname) |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7924 { |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7925 int id = -1; |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7926 |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7927 id = buf_findsign_id(curwin->w_buffer, curwin->w_cursor.lnum, groupname); |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7928 if (id > 0) |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7929 sign_unplace(id, groupname, curwin->w_buffer, curwin->w_cursor.lnum); |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7930 else |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7931 EMSG(_("E159: Missing sign number")); |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7932 } |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7933 |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
7934 /* |
| 7 | 7935 * ":sign" command |
| 7936 */ | |
| 7937 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
7938 ex_sign(exarg_T *eap) |
| 7 | 7939 { |
| 7940 char_u *arg = eap->arg; | |
| 7941 char_u *p; | |
| 7942 int idx; | |
| 7943 sign_T *sp; | |
|
12820
63d87ba12c34
patch 8.0.1287: temp file used for viminfo may have wrong permissions
Christian Brabandt <cb@256bit.org>
parents:
12676
diff
changeset
|
7944 buf_T *buf = NULL; |
| 7 | 7945 |
| 7946 /* Parse the subcommand. */ | |
| 7947 p = skiptowhite(arg); | |
| 1868 | 7948 idx = sign_cmd_idx(arg, p); |
| 7949 if (idx == SIGNCMD_LAST) | |
| 7950 { | |
| 7951 EMSG2(_("E160: Unknown sign command: %s"), arg); | |
| 7952 return; | |
| 7 | 7953 } |
| 7954 arg = skipwhite(p); | |
| 7955 | |
| 7956 if (idx <= SIGNCMD_LIST) | |
| 7957 { | |
| 7958 /* | |
| 7959 * Define, undefine or list signs. | |
| 7960 */ | |
| 7961 if (idx == SIGNCMD_LIST && *arg == NUL) | |
| 7962 { | |
| 7963 /* ":sign list": list all defined signs */ | |
| 3411 | 7964 for (sp = first_sign; sp != NULL && !got_int; sp = sp->sn_next) |
| 7 | 7965 sign_list_defined(sp); |
| 7966 } | |
| 7967 else if (*arg == NUL) | |
| 7968 EMSG(_("E156: Missing sign name")); | |
| 7969 else | |
| 7970 { | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7971 char_u *name; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7972 char_u *icon = NULL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7973 char_u *text = NULL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7974 char_u *linehl = NULL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7975 char_u *texthl = NULL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7976 |
| 2605 | 7977 /* Isolate the sign name. If it's a number skip leading zeroes, |
| 7978 * so that "099" and "99" are the same sign. But keep "0". */ | |
| 7 | 7979 p = skiptowhite(arg); |
| 7980 if (*p != NUL) | |
| 7981 *p++ = NUL; | |
| 2605 | 7982 while (arg[0] == '0' && arg[1] != NUL) |
| 7983 ++arg; | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7984 name = vim_strsave(arg); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7985 |
| 7 | 7986 if (idx == SIGNCMD_DEFINE) |
| 7987 { | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7988 int failed = FALSE; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
7989 |
| 7 | 7990 /* ":sign define {name} ...": define a sign */ |
| 7991 | |
| 7992 /* set values for a defined sign. */ | |
| 7993 for (;;) | |
| 7994 { | |
| 7995 arg = skipwhite(p); | |
| 7996 if (*arg == NUL) | |
| 7997 break; | |
| 7998 p = skiptowhite_esc(arg); | |
| 7999 if (STRNCMP(arg, "icon=", 5) == 0) | |
| 8000 { | |
| 8001 arg += 5; | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8002 icon = vim_strnsave(arg, (int)(p - arg)); |
| 7 | 8003 } |
| 8004 else if (STRNCMP(arg, "text=", 5) == 0) | |
| 8005 { | |
| 8006 arg += 5; | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8007 text = vim_strnsave(arg, (int)(p - arg)); |
| 7 | 8008 } |
| 8009 else if (STRNCMP(arg, "linehl=", 7) == 0) | |
| 8010 { | |
| 8011 arg += 7; | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8012 linehl = vim_strnsave(arg, (int)(p - arg)); |
| 7 | 8013 } |
| 8014 else if (STRNCMP(arg, "texthl=", 7) == 0) | |
| 8015 { | |
| 8016 arg += 7; | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8017 texthl = vim_strnsave(arg, (int)(p - arg)); |
| 7 | 8018 } |
| 8019 else | |
| 8020 { | |
| 8021 EMSG2(_(e_invarg2), arg); | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8022 failed = TRUE; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8023 break; |
| 7 | 8024 } |
| 8025 } | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8026 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8027 if (!failed) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8028 sign_define_by_name(name, icon, linehl, text, texthl); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8029 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8030 vim_free(icon); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8031 vim_free(text); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8032 vim_free(linehl); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8033 vim_free(texthl); |
| 7 | 8034 } |
| 8035 else if (idx == SIGNCMD_LIST) | |
| 8036 /* ":sign list {name}" */ | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8037 sign_list_by_name(name); |
| 7 | 8038 else |
| 8039 /* ":sign undefine {name}" */ | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8040 sign_undefine_by_name(name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8041 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8042 vim_free(name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8043 return; |
| 7 | 8044 } |
| 8045 } | |
| 8046 else | |
| 8047 { | |
| 8048 int id = -1; | |
| 8049 linenr_T lnum = -1; | |
| 8050 char_u *sign_name = NULL; | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8051 char_u *group = NULL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8052 int prio = SIGN_DEF_PRIO; |
| 7 | 8053 char_u *arg1; |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8054 int bufarg = FALSE; |
| 7 | 8055 |
| 8056 if (*arg == NUL) | |
| 8057 { | |
| 8058 if (idx == SIGNCMD_PLACE) | |
| 8059 { | |
| 8060 /* ":sign place": list placed signs in all buffers */ | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8061 sign_list_placed(NULL, NULL); |
| 7 | 8062 } |
| 8063 else if (idx == SIGNCMD_UNPLACE) | |
| 8064 /* ":sign unplace": remove placed sign at cursor */ | |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8065 sign_unplace_at_cursor(NULL); |
| 7 | 8066 else |
| 8067 EMSG(_(e_argreq)); | |
| 8068 return; | |
| 8069 } | |
| 8070 | |
| 8071 if (idx == SIGNCMD_UNPLACE && arg[0] == '*' && arg[1] == NUL) | |
| 8072 { | |
| 8073 /* ":sign unplace *": remove all placed signs */ | |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8074 buf_delete_all_signs(NULL); |
| 7 | 8075 return; |
| 8076 } | |
| 8077 | |
| 8078 /* first arg could be placed sign id */ | |
| 8079 arg1 = arg; | |
| 8080 if (VIM_ISDIGIT(*arg)) | |
| 8081 { | |
| 8082 id = getdigits(&arg); | |
|
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11127
diff
changeset
|
8083 if (!VIM_ISWHITE(*arg) && *arg != NUL) |
| 7 | 8084 { |
| 8085 id = -1; | |
| 8086 arg = arg1; | |
| 8087 } | |
| 8088 else | |
| 8089 { | |
| 8090 arg = skipwhite(arg); | |
| 8091 if (idx == SIGNCMD_UNPLACE && *arg == NUL) | |
| 8092 { | |
| 8093 /* ":sign unplace {id}": remove placed sign by number */ | |
|
9649
fd9727ae3c49
commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
8094 FOR_ALL_BUFFERS(buf) |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8095 sign_unplace(id, NULL, buf, 0); |
| 7 | 8096 return; |
| 8097 } | |
| 8098 } | |
| 8099 } | |
| 8100 | |
| 8101 /* | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8102 * Check for line={lnum} name={name} group={group} priority={prio} |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8103 * and file={fname} or buffer={nr}. Leave "arg" pointing to {fname}. |
| 7 | 8104 */ |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8105 while (*arg != NUL) |
| 7 | 8106 { |
| 8107 if (STRNCMP(arg, "line=", 5) == 0) | |
| 8108 { | |
| 8109 arg += 5; | |
| 8110 lnum = atoi((char *)arg); | |
| 8111 arg = skiptowhite(arg); | |
| 8112 } | |
| 3672 | 8113 else if (STRNCMP(arg, "*", 1) == 0 && idx == SIGNCMD_UNPLACE) |
| 8114 { | |
| 8115 if (id != -1) | |
| 8116 { | |
| 8117 EMSG(_(e_invarg)); | |
| 8118 return; | |
| 8119 } | |
| 8120 id = -2; | |
| 8121 arg = skiptowhite(arg + 1); | |
| 8122 } | |
| 7 | 8123 else if (STRNCMP(arg, "name=", 5) == 0) |
| 8124 { | |
| 8125 arg += 5; | |
| 8126 sign_name = arg; | |
| 8127 arg = skiptowhite(arg); | |
| 8128 if (*arg != NUL) | |
| 8129 *arg++ = NUL; | |
| 2605 | 8130 while (sign_name[0] == '0' && sign_name[1] != NUL) |
| 8131 ++sign_name; | |
| 7 | 8132 } |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8133 else if (STRNCMP(arg, "group=", 6) == 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8134 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8135 arg += 6; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8136 group = arg; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8137 arg = skiptowhite(arg); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8138 if (*arg != NUL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8139 *arg++ = NUL; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8140 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8141 else if (STRNCMP(arg, "priority=", 9) == 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8142 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8143 arg += 9; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8144 prio = atoi((char *)arg); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8145 arg = skiptowhite(arg); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8146 } |
| 7 | 8147 else if (STRNCMP(arg, "file=", 5) == 0) |
| 8148 { | |
| 8149 arg += 5; | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8150 buf = buflist_findname_exp(arg); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8151 bufarg = TRUE; |
| 7 | 8152 break; |
| 8153 } | |
| 8154 else if (STRNCMP(arg, "buffer=", 7) == 0) | |
| 8155 { | |
| 8156 arg += 7; | |
| 8157 buf = buflist_findnr((int)getdigits(&arg)); | |
| 8158 if (*skipwhite(arg) != NUL) | |
| 8159 EMSG(_(e_trailing)); | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8160 bufarg = TRUE; |
| 7 | 8161 break; |
| 8162 } | |
| 8163 else | |
| 8164 { | |
| 8165 EMSG(_(e_invarg)); | |
| 8166 return; | |
| 8167 } | |
| 8168 arg = skipwhite(arg); | |
| 8169 } | |
| 8170 | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8171 if ((!bufarg && group == NULL) || (group != NULL && *group == '\0')) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8172 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8173 // File or buffer is not specified or an empty group is used |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8174 EMSG(_(e_invarg)); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8175 return; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8176 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8177 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8178 if (bufarg && buf == NULL) |
| 7 | 8179 { |
| 8180 EMSG2(_("E158: Invalid buffer name: %s"), arg); | |
| 8181 } | |
|
15247
336728a577f5
patch 8.1.0632: using sign group names is inefficient
Bram Moolenaar <Bram@vim.org>
parents:
15211
diff
changeset
|
8182 else if (id <= 0 && idx == SIGNCMD_PLACE) |
| 7 | 8183 { |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8184 if ((group == NULL) && (lnum >= 0 || sign_name != NULL)) |
| 7 | 8185 EMSG(_(e_invarg)); |
| 8186 else | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8187 // ":sign place file={fname}": list placed signs in one file |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8188 // ":sign place group={group} file={fname}" |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8189 // ":sign place group=* file={fname}" |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8190 sign_list_placed(buf, group); |
| 7 | 8191 } |
| 8192 else if (idx == SIGNCMD_JUMP) | |
| 8193 { | |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8194 // ":sign jump {id} file={fname}" |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8195 // ":sign jump {id} group={group} file={fname}" |
|
15271
a6319aca721b
patch 8.1.0644: finding next sign ID is inefficient
Bram Moolenaar <Bram@vim.org>
parents:
15247
diff
changeset
|
8196 if (lnum >= 0 || sign_name != NULL || buf == NULL) |
| 7 | 8197 EMSG(_(e_invarg)); |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8198 else if ((lnum = buf_findsign(buf, id, group)) > 0) |
| 7 | 8199 { /* goto a sign ... */ |
| 8200 if (buf_jump_open_win(buf) != NULL) | |
| 8201 { /* ... in a current window */ | |
| 8202 curwin->w_cursor.lnum = lnum; | |
| 8203 check_cursor_lnum(); | |
| 8204 beginline(BL_WHITE); | |
| 8205 } | |
| 8206 else | |
| 8207 { /* ... not currently in a window */ | |
| 8208 char_u *cmd; | |
| 8209 | |
|
9902
5a667a3a3743
commit https://github.com/vim/vim/commit/bfd096d02087a10e8e2f4bdfb74e0435506fa8bb
Christian Brabandt <cb@256bit.org>
parents:
9890
diff
changeset
|
8210 if (buf->b_fname == NULL) |
|
5a667a3a3743
commit https://github.com/vim/vim/commit/bfd096d02087a10e8e2f4bdfb74e0435506fa8bb
Christian Brabandt <cb@256bit.org>
parents:
9890
diff
changeset
|
8211 { |
|
5a667a3a3743
commit https://github.com/vim/vim/commit/bfd096d02087a10e8e2f4bdfb74e0435506fa8bb
Christian Brabandt <cb@256bit.org>
parents:
9890
diff
changeset
|
8212 EMSG(_("E934: Cannot jump to a buffer that does not have a name")); |
|
5a667a3a3743
commit https://github.com/vim/vim/commit/bfd096d02087a10e8e2f4bdfb74e0435506fa8bb
Christian Brabandt <cb@256bit.org>
parents:
9890
diff
changeset
|
8213 return; |
|
5a667a3a3743
commit https://github.com/vim/vim/commit/bfd096d02087a10e8e2f4bdfb74e0435506fa8bb
Christian Brabandt <cb@256bit.org>
parents:
9890
diff
changeset
|
8214 } |
| 7 | 8215 cmd = alloc((unsigned)STRLEN(buf->b_fname) + 25); |
| 8216 if (cmd == NULL) | |
| 8217 return; | |
| 8218 sprintf((char *)cmd, "e +%ld %s", (long)lnum, buf->b_fname); | |
| 8219 do_cmdline_cmd(cmd); | |
| 8220 vim_free(cmd); | |
| 8221 } | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8222 # ifdef FEAT_FOLDING |
| 7 | 8223 foldOpenCursor(); |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8224 # endif |
| 7 | 8225 } |
| 8226 else | |
| 8227 EMSGN(_("E157: Invalid sign ID: %ld"), id); | |
| 8228 } | |
| 8229 else if (idx == SIGNCMD_UNPLACE) | |
| 8230 { | |
| 8231 if (lnum >= 0 || sign_name != NULL) | |
| 8232 EMSG(_(e_invarg)); | |
| 3672 | 8233 else if (id == -2) |
| 8234 { | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8235 if (buf != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8236 // ":sign unplace * file={fname}" |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8237 sign_unplace(0, group, buf, 0); |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8238 else |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8239 // ":sign unplace * group=*": remove all placed signs |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8240 FOR_ALL_BUFFERS(buf) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8241 if (buf->b_signlist != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8242 buf_delete_signs(buf, group); |
| 3672 | 8243 } |
| 7 | 8244 else |
| 8245 { | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8246 if (buf != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8247 // ":sign unplace {id} file={fname}" |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8248 // ":sign unplace {id} group={group} file={fname}" |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8249 // ":sign unplace {id} group=* file={fname}" |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8250 sign_unplace(id, group, buf, 0); |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8251 else |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8252 { |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8253 if (id == -1) |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8254 { |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8255 // ":sign unplace group={group}": |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8256 // ":sign unplace group=*": |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8257 // remove sign in the current line in specified group |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8258 sign_unplace_at_cursor(group); |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8259 } |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8260 else |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8261 { |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8262 // ":sign unplace {id} group={group}": |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8263 // ":sign unplace {id} group=*": |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8264 // remove all placed signs in this group. |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8265 FOR_ALL_BUFFERS(buf) |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8266 if (buf->b_signlist != NULL) |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8267 sign_unplace(id, group, buf, 0); |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8268 } |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8269 } |
| 7 | 8270 } |
| 8271 } | |
| 8272 /* idx == SIGNCMD_PLACE */ | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8273 else if (sign_name != NULL && buf != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8274 sign_place(&id, group, sign_name, buf, lnum, prio); |
| 7 | 8275 else |
| 8276 EMSG(_(e_invarg)); | |
| 8277 } | |
| 8278 } | |
| 8279 | |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8280 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8281 * Return information about a specified sign |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8282 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8283 static void |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8284 sign_getinfo(sign_T *sp, dict_T *retdict) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8285 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8286 char_u *p; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8287 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8288 dict_add_string(retdict, "name", (char_u *)sp->sn_name); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8289 if (sp->sn_icon != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8290 dict_add_string(retdict, "icon", (char_u *)sp->sn_icon); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8291 if (sp->sn_text != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8292 dict_add_string(retdict, "text", (char_u *)sp->sn_text); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8293 if (sp->sn_line_hl > 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8294 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8295 p = get_highlight_name_ext(NULL, sp->sn_line_hl - 1, FALSE); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8296 if (p == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8297 p = (char_u *)"NONE"; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8298 dict_add_string(retdict, "linehl", (char_u *)p); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8299 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8300 if (sp->sn_text_hl > 0) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8301 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8302 p = get_highlight_name_ext(NULL, sp->sn_text_hl - 1, FALSE); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8303 if (p == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8304 p = (char_u *)"NONE"; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8305 dict_add_string(retdict, "texthl", (char_u *)p); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8306 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8307 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8308 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8309 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8310 * If 'name' is NULL, return a list of all the defined signs. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8311 * Otherwise, return information about the specified sign. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8312 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8313 void |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8314 sign_getlist(char_u *name, list_T *retlist) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8315 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8316 sign_T *sp = first_sign; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8317 dict_T *dict; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8318 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8319 if (name != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8320 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8321 sp = sign_find(name, NULL); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8322 if (sp == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8323 return; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8324 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8325 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8326 for (; sp != NULL && !got_int; sp = sp->sn_next) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8327 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8328 if ((dict = dict_alloc_id(aid_sign_getlist)) == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8329 return; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8330 if (list_append_dict(retlist, dict) == FAIL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8331 return; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8332 sign_getinfo(sp, dict); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8333 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8334 if (name != NULL) // handle only the specified sign |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8335 break; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8336 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8337 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8338 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8339 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8340 * Return information about all the signs placed in a buffer |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8341 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8342 static void |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8343 sign_get_placed_in_buf( |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8344 buf_T *buf, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8345 linenr_T lnum, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8346 int sign_id, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8347 char_u *sign_group, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8348 list_T *retlist) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8349 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8350 dict_T *d; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8351 list_T *l; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8352 signlist_T *sign; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8353 dict_T *sdict; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8354 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8355 if ((d = dict_alloc_id(aid_sign_getplaced_dict)) == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8356 return; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8357 list_append_dict(retlist, d); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8358 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8359 dict_add_number(d, "bufnr", (long)buf->b_fnum); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8360 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8361 if ((l = list_alloc_id(aid_sign_getplaced_list)) == NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8362 return; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8363 dict_add_list(d, "signs", l); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8364 |
|
15271
a6319aca721b
patch 8.1.0644: finding next sign ID is inefficient
Bram Moolenaar <Bram@vim.org>
parents:
15247
diff
changeset
|
8365 FOR_ALL_SIGNS_IN_BUF(buf, sign) |
|
15209
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8366 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8367 if (!sign_in_group(sign, sign_group)) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8368 continue; |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8369 if ((lnum == 0 && sign_id == 0) || |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8370 (sign_id == 0 && lnum == sign->lnum) || |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8371 (lnum == 0 && sign_id == sign->id) || |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8372 (lnum == sign->lnum && sign_id == sign->id)) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8373 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8374 if ((sdict = sign_get_info(sign)) != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8375 list_append_dict(l, sdict); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8376 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8377 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8378 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8379 |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8380 /* |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8381 * Get a list of signs placed in buffer 'buf'. If 'num' is non-zero, return the |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8382 * sign placed at the line number. If 'lnum' is zero, return all the signs |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8383 * placed in 'buf'. If 'buf' is NULL, return signs placed in all the buffers. |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8384 */ |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8385 void |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8386 sign_get_placed( |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8387 buf_T *buf, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8388 linenr_T lnum, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8389 int sign_id, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8390 char_u *sign_group, |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8391 list_T *retlist) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8392 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8393 if (buf != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8394 sign_get_placed_in_buf(buf, lnum, sign_id, sign_group, retlist); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8395 else |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8396 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8397 FOR_ALL_BUFFERS(buf) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8398 { |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8399 if (buf->b_signlist != NULL) |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8400 sign_get_placed_in_buf(buf, 0, sign_id, sign_group, retlist); |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8401 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8402 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8403 } |
|
3a99b2e6d136
patch 8.1.0614: placing signs can be complicated
Bram Moolenaar <Bram@vim.org>
parents:
15156
diff
changeset
|
8404 |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8405 # if defined(FEAT_SIGN_ICONS) || defined(PROTO) |
| 7 | 8406 /* |
| 8407 * Allocate the icons. Called when the GUI has started. Allows defining | |
| 8408 * signs before it starts. | |
| 8409 */ | |
| 8410 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8411 sign_gui_started(void) |
| 7 | 8412 { |
| 8413 sign_T *sp; | |
| 8414 | |
| 8415 for (sp = first_sign; sp != NULL; sp = sp->sn_next) | |
| 8416 if (sp->sn_icon != NULL) | |
| 8417 sp->sn_image = gui_mch_register_sign(sp->sn_icon); | |
| 8418 } | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8419 # endif |
| 7 | 8420 |
| 8421 /* | |
| 8422 * List one sign. | |
| 8423 */ | |
| 8424 static void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8425 sign_list_defined(sign_T *sp) |
| 7 | 8426 { |
| 8427 char_u *p; | |
| 8428 | |
| 274 | 8429 smsg((char_u *)"sign %s", sp->sn_name); |
| 7 | 8430 if (sp->sn_icon != NULL) |
| 8431 { | |
| 8432 MSG_PUTS(" icon="); | |
| 8433 msg_outtrans(sp->sn_icon); | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8434 # ifdef FEAT_SIGN_ICONS |
| 7 | 8435 if (sp->sn_image == NULL) |
| 8436 MSG_PUTS(_(" (NOT FOUND)")); | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8437 # else |
| 7 | 8438 MSG_PUTS(_(" (not supported)")); |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8439 # endif |
| 7 | 8440 } |
| 8441 if (sp->sn_text != NULL) | |
| 8442 { | |
| 8443 MSG_PUTS(" text="); | |
| 8444 msg_outtrans(sp->sn_text); | |
| 8445 } | |
| 8446 if (sp->sn_line_hl > 0) | |
| 8447 { | |
| 8448 MSG_PUTS(" linehl="); | |
|
11254
918942a3b0ef
patch 8.0.0513: getting name of cleared highlight group is wrong
Christian Brabandt <cb@256bit.org>
parents:
11158
diff
changeset
|
8449 p = get_highlight_name_ext(NULL, sp->sn_line_hl - 1, FALSE); |
| 7 | 8450 if (p == NULL) |
| 8451 MSG_PUTS("NONE"); | |
| 8452 else | |
| 8453 msg_puts(p); | |
| 8454 } | |
| 8455 if (sp->sn_text_hl > 0) | |
| 8456 { | |
| 8457 MSG_PUTS(" texthl="); | |
|
11254
918942a3b0ef
patch 8.0.0513: getting name of cleared highlight group is wrong
Christian Brabandt <cb@256bit.org>
parents:
11158
diff
changeset
|
8458 p = get_highlight_name_ext(NULL, sp->sn_text_hl - 1, FALSE); |
| 7 | 8459 if (p == NULL) |
| 8460 MSG_PUTS("NONE"); | |
| 8461 else | |
| 8462 msg_puts(p); | |
| 8463 } | |
| 8464 } | |
| 8465 | |
| 8466 /* | |
| 1828 | 8467 * Undefine a sign and free its memory. |
| 8468 */ | |
| 8469 static void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8470 sign_undefine(sign_T *sp, sign_T *sp_prev) |
| 1828 | 8471 { |
| 8472 vim_free(sp->sn_name); | |
| 8473 vim_free(sp->sn_icon); | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8474 # ifdef FEAT_SIGN_ICONS |
| 1828 | 8475 if (sp->sn_image != NULL) |
| 8476 { | |
| 8477 out_flush(); | |
| 8478 gui_mch_destroy_sign(sp->sn_image); | |
| 8479 } | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8480 # endif |
| 1828 | 8481 vim_free(sp->sn_text); |
| 8482 if (sp_prev == NULL) | |
| 8483 first_sign = sp->sn_next; | |
| 8484 else | |
| 8485 sp_prev->sn_next = sp->sn_next; | |
| 8486 vim_free(sp); | |
| 8487 } | |
| 8488 | |
| 8489 /* | |
| 7 | 8490 * Get highlighting attribute for sign "typenr". |
| 8491 * If "line" is TRUE: line highl, if FALSE: text highl. | |
| 8492 */ | |
| 8493 int | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8494 sign_get_attr(int typenr, int line) |
| 7 | 8495 { |
| 8496 sign_T *sp; | |
| 8497 | |
| 8498 for (sp = first_sign; sp != NULL; sp = sp->sn_next) | |
| 8499 if (sp->sn_typenr == typenr) | |
| 8500 { | |
| 8501 if (line) | |
| 8502 { | |
| 8503 if (sp->sn_line_hl > 0) | |
| 8504 return syn_id2attr(sp->sn_line_hl); | |
| 8505 } | |
| 8506 else | |
| 8507 { | |
| 8508 if (sp->sn_text_hl > 0) | |
| 8509 return syn_id2attr(sp->sn_text_hl); | |
| 8510 } | |
| 8511 break; | |
| 8512 } | |
| 8513 return 0; | |
| 8514 } | |
| 8515 | |
| 8516 /* | |
| 8517 * Get text mark for sign "typenr". | |
| 8518 * Returns NULL if there isn't one. | |
| 8519 */ | |
| 8520 char_u * | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8521 sign_get_text(int typenr) |
| 7 | 8522 { |
| 8523 sign_T *sp; | |
| 8524 | |
| 8525 for (sp = first_sign; sp != NULL; sp = sp->sn_next) | |
| 8526 if (sp->sn_typenr == typenr) | |
| 8527 return sp->sn_text; | |
| 8528 return NULL; | |
| 8529 } | |
| 8530 | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8531 # if defined(FEAT_SIGN_ICONS) || defined(PROTO) |
| 7 | 8532 void * |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8533 sign_get_image( |
|
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8534 int typenr) /* the attribute which may have a sign */ |
| 7 | 8535 { |
| 8536 sign_T *sp; | |
| 8537 | |
| 8538 for (sp = first_sign; sp != NULL; sp = sp->sn_next) | |
| 8539 if (sp->sn_typenr == typenr) | |
| 8540 return sp->sn_image; | |
| 8541 return NULL; | |
| 8542 } | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8543 # endif |
| 7 | 8544 |
| 8545 /* | |
| 8546 * Get the name of a sign by its typenr. | |
| 8547 */ | |
| 8548 char_u * | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8549 sign_typenr2name(int typenr) |
| 7 | 8550 { |
| 8551 sign_T *sp; | |
| 8552 | |
| 8553 for (sp = first_sign; sp != NULL; sp = sp->sn_next) | |
| 8554 if (sp->sn_typenr == typenr) | |
| 8555 return sp->sn_name; | |
| 8556 return (char_u *)_("[Deleted]"); | |
| 8557 } | |
| 8558 | |
| 1828 | 8559 /* |
| 8560 * Undefine/free all signs. | |
| 8561 */ | |
| 8562 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8563 free_signs(void) |
| 1828 | 8564 { |
| 8565 while (first_sign != NULL) | |
| 8566 sign_undefine(first_sign, NULL); | |
| 8567 } | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8568 |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8569 # if defined(FEAT_CMDL_COMPL) || defined(PROTO) |
| 1868 | 8570 static enum |
| 8571 { | |
| 8572 EXP_SUBCMD, /* expand :sign sub-commands */ | |
| 8573 EXP_DEFINE, /* expand :sign define {name} args */ | |
| 8574 EXP_PLACE, /* expand :sign place {id} args */ | |
| 8575 EXP_UNPLACE, /* expand :sign unplace" */ | |
| 8576 EXP_SIGN_NAMES /* expand with name of placed signs */ | |
| 8577 } expand_what; | |
| 8578 | |
| 8579 /* | |
| 8580 * Function given to ExpandGeneric() to obtain the sign command | |
| 8581 * expansion. | |
| 8582 */ | |
| 8583 char_u * | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8584 get_sign_name(expand_T *xp UNUSED, int idx) |
| 1868 | 8585 { |
| 8586 sign_T *sp; | |
| 8587 int current_idx; | |
| 8588 | |
| 8589 switch (expand_what) | |
| 8590 { | |
| 8591 case EXP_SUBCMD: | |
| 8592 return (char_u *)cmds[idx]; | |
| 8593 case EXP_DEFINE: | |
| 8594 { | |
| 8595 char *define_arg[] = | |
| 8596 { | |
| 8597 "icon=", "linehl=", "text=", "texthl=", NULL | |
| 8598 }; | |
| 8599 return (char_u *)define_arg[idx]; | |
| 8600 } | |
| 8601 case EXP_PLACE: | |
| 8602 { | |
| 8603 char *place_arg[] = | |
| 8604 { | |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8605 "line=", "name=", "group=", "priority=", "file=", |
|
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8606 "buffer=", NULL |
| 1868 | 8607 }; |
| 8608 return (char_u *)place_arg[idx]; | |
| 8609 } | |
| 8610 case EXP_UNPLACE: | |
| 8611 { | |
|
15300
890203d87ee5
patch 8.1.0658: deleting signs and completion for :sign is insufficient
Bram Moolenaar <Bram@vim.org>
parents:
15271
diff
changeset
|
8612 char *unplace_arg[] = { "group=", "file=", "buffer=", NULL }; |
| 1868 | 8613 return (char_u *)unplace_arg[idx]; |
| 8614 } | |
| 8615 case EXP_SIGN_NAMES: | |
| 8616 /* Complete with name of signs already defined */ | |
| 8617 current_idx = 0; | |
| 8618 for (sp = first_sign; sp != NULL; sp = sp->sn_next) | |
| 8619 if (current_idx++ == idx) | |
| 8620 return sp->sn_name; | |
| 8621 return NULL; | |
| 8622 default: | |
| 8623 return NULL; | |
| 8624 } | |
| 8625 } | |
| 8626 | |
| 8627 /* | |
| 8628 * Handle command line completion for :sign command. | |
| 8629 */ | |
| 8630 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8631 set_context_in_sign_cmd(expand_T *xp, char_u *arg) |
| 1868 | 8632 { |
| 8633 char_u *p; | |
| 8634 char_u *end_subcmd; | |
| 8635 char_u *last; | |
| 8636 int cmd_idx; | |
| 8637 char_u *begin_subcmd_args; | |
| 8638 | |
| 8639 /* Default: expand subcommands. */ | |
| 8640 xp->xp_context = EXPAND_SIGN; | |
| 8641 expand_what = EXP_SUBCMD; | |
| 8642 xp->xp_pattern = arg; | |
| 8643 | |
| 8644 end_subcmd = skiptowhite(arg); | |
| 8645 if (*end_subcmd == NUL) | |
| 8646 /* expand subcmd name | |
| 8647 * :sign {subcmd}<CTRL-D>*/ | |
| 8648 return; | |
| 8649 | |
| 8650 cmd_idx = sign_cmd_idx(arg, end_subcmd); | |
| 8651 | |
| 8652 /* :sign {subcmd} {subcmd_args} | |
|
2311
ccda151dde4e
Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents:
2290
diff
changeset
|
8653 * | |
|
ccda151dde4e
Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents:
2290
diff
changeset
|
8654 * begin_subcmd_args */ |
| 1868 | 8655 begin_subcmd_args = skipwhite(end_subcmd); |
| 8656 p = skiptowhite(begin_subcmd_args); | |
| 8657 if (*p == NUL) | |
| 8658 { | |
| 8659 /* | |
| 8660 * Expand first argument of subcmd when possible. | |
| 8661 * For ":jump {id}" and ":unplace {id}", we could | |
| 8662 * possibly expand the ids of all signs already placed. | |
| 8663 */ | |
| 8664 xp->xp_pattern = begin_subcmd_args; | |
| 8665 switch (cmd_idx) | |
| 8666 { | |
| 8667 case SIGNCMD_LIST: | |
| 8668 case SIGNCMD_UNDEFINE: | |
| 8669 /* :sign list <CTRL-D> | |
| 8670 * :sign undefine <CTRL-D> */ | |
| 8671 expand_what = EXP_SIGN_NAMES; | |
| 8672 break; | |
| 8673 default: | |
| 8674 xp->xp_context = EXPAND_NOTHING; | |
| 8675 } | |
| 8676 return; | |
| 8677 } | |
| 8678 | |
| 8679 /* expand last argument of subcmd */ | |
| 8680 | |
| 8681 /* :sign define {name} {args}... | |
|
2311
ccda151dde4e
Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents:
2290
diff
changeset
|
8682 * | |
|
ccda151dde4e
Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents:
2290
diff
changeset
|
8683 * p */ |
| 1868 | 8684 |
| 8685 /* Loop until reaching last argument. */ | |
| 8686 do | |
| 8687 { | |
| 8688 p = skipwhite(p); | |
| 8689 last = p; | |
| 8690 p = skiptowhite(p); | |
| 8691 } while (*p != NUL); | |
| 8692 | |
| 8693 p = vim_strchr(last, '='); | |
| 8694 | |
| 8695 /* :sign define {name} {args}... {last}= | |
|
2311
ccda151dde4e
Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents:
2290
diff
changeset
|
8696 * | | |
|
ccda151dde4e
Support completion for ":find". (Nazri Ramliy)
Bram Moolenaar <bram@vim.org>
parents:
2290
diff
changeset
|
8697 * last p */ |
|
10299
7b2f95633e28
commit https://github.com/vim/vim/commit/7756e7465d627ff9cd01e59625484a8c302ef853
Christian Brabandt <cb@256bit.org>
parents:
10264
diff
changeset
|
8698 if (p == NULL) |
| 1868 | 8699 { |
| 8700 /* Expand last argument name (before equal sign). */ | |
| 8701 xp->xp_pattern = last; | |
| 8702 switch (cmd_idx) | |
| 8703 { | |
| 8704 case SIGNCMD_DEFINE: | |
| 8705 expand_what = EXP_DEFINE; | |
| 8706 break; | |
| 8707 case SIGNCMD_PLACE: | |
| 8708 expand_what = EXP_PLACE; | |
| 8709 break; | |
| 8710 case SIGNCMD_JUMP: | |
| 8711 case SIGNCMD_UNPLACE: | |
| 8712 expand_what = EXP_UNPLACE; | |
| 8713 break; | |
| 8714 default: | |
| 8715 xp->xp_context = EXPAND_NOTHING; | |
| 8716 } | |
| 8717 } | |
| 8718 else | |
| 8719 { | |
| 8720 /* Expand last argument value (after equal sign). */ | |
| 8721 xp->xp_pattern = p + 1; | |
| 8722 switch (cmd_idx) | |
| 8723 { | |
| 8724 case SIGNCMD_DEFINE: | |
| 8725 if (STRNCMP(last, "texthl", p - last) == 0 || | |
| 8726 STRNCMP(last, "linehl", p - last) == 0) | |
| 8727 xp->xp_context = EXPAND_HIGHLIGHT; | |
| 8728 else if (STRNCMP(last, "icon", p - last) == 0) | |
| 8729 xp->xp_context = EXPAND_FILES; | |
| 8730 else | |
| 8731 xp->xp_context = EXPAND_NOTHING; | |
| 8732 break; | |
| 8733 case SIGNCMD_PLACE: | |
| 8734 if (STRNCMP(last, "name", p - last) == 0) | |
| 8735 expand_what = EXP_SIGN_NAMES; | |
| 8736 else | |
| 8737 xp->xp_context = EXPAND_NOTHING; | |
| 8738 break; | |
| 8739 default: | |
| 8740 xp->xp_context = EXPAND_NOTHING; | |
| 8741 } | |
| 8742 } | |
| 8743 } | |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8744 # endif |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8745 #endif |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8746 |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8747 /* |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8748 * Make the user happy. |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8749 */ |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8750 void |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8751 ex_smile(exarg_T *eap UNUSED) |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8752 { |
|
8879
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8753 static char *code[] = { |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8754 "\34 \4o\14$\4ox\30 \2o\30$\1ox\25 \2o\36$\1o\11 \1o\1$\3 \2$\1 \1o\1$x\5 \1o\1 \1$\1 \2o\10 \1o\44$\1o\7 \2$\1 \2$\1 \2$\1o\1$x\2 \2o\1 \1$\1 \1$\1 \1\"\1$\6 \1o\11$\4 \15$\4 \11$\1o\7 \3$\1o\2$\1o\1$x\2 \1\"\6$\1o\1$\5 \1o\11$\6 \13$\6 \12$\1o\4 \10$x\4 \7$\4 \13$\6 \13$\6 \27$x\4 \27$\4 \15$\4 \16$\2 \3\"\3$x\5 \1\"\3$\4\"\61$\5 \1\"\3$x\6 \3$\3 \1o\62$\5 \1\"\3$\1ox\5 \1o\2$\1\"\3 \63$\7 \3$\1ox\5 \3$\4 \55$\1\"\1 \1\"\6$", |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8755 "\5o\4$\1ox\4 \1o\3$\4o\5$\2 \45$\3 \1o\21$x\4 \10$\1\"\4$\3 \42$\5 \4$\10\"x\3 \4\"\7 \4$\4 \1\"\34$\1\"\6 \1o\3$x\16 \1\"\3$\1o\5 \3\"\22$\1\"\2$\1\"\11 \3$x\20 \3$\1o\12 \1\"\2$\2\"\6$\4\"\13 \1o\3$x\21 \4$\1o\40 \1o\3$\1\"x\22 \1\"\4$\1o\6 \1o\6$\1o\1\"\4$\1o\10 \1o\4$x\24 \1\"\5$\2o\5 \2\"\4$\1o\5$\1o\3 \1o\4$\2\"x\27 \2\"\5$\4o\2 \1\"\3$\1o\11$\3\"x\32 \2\"\7$\2o\1 \12$x\42 \4\"\13$x\46 \14$x\47 \12$\1\"x\50 \1\"\3$\4\"x" |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8756 }; |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8757 char *p; |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8758 int n; |
|
8879
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8759 int i; |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8760 |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8761 msg_start(); |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8762 msg_putchar('\n'); |
|
8879
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8763 for (i = 0; i < 2; ++i) |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8764 for (p = code[i]; *p != NUL; ++p) |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8765 if (*p == 'x') |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8766 msg_putchar('\n'); |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8767 else |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8768 for (n = *p++; n > 0; --n) |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8769 if (*p == 'o' || *p == '$') |
|
11158
501f46f7644c
patch 8.0.0466: still macros that should be all-caps
Christian Brabandt <cb@256bit.org>
parents:
11144
diff
changeset
|
8770 msg_putchar_attr(*p, HL_ATTR(HLF_L)); |
|
8879
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8771 else |
|
cea5ff374062
commit https://github.com/vim/vim/commit/700eefe5a4385fd128f5496e3ca384869752376a
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
8772 msg_putchar(*p); |
|
7402
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8773 msg_clr_eos(); |
|
2c63e9ecf29d
commit https://github.com/vim/vim/commit/86e179dbe75010e9545e1a2fcc92a15d57bf27fd
Christian Brabandt <cb@256bit.org>
parents:
7340
diff
changeset
|
8774 } |
| 7 | 8775 |
| 8776 /* | |
| 8777 * ":drop" | |
| 8778 * Opens the first argument in a window. When there are two or more arguments | |
| 8779 * the argument list is redefined. | |
| 8780 */ | |
| 8781 void | |
|
7819
f86adafb28d4
commit https://github.com/vim/vim/commit/78c0b7d43e5048fd71d12816659667834170c76d
Christian Brabandt <cb@256bit.org>
parents:
7799
diff
changeset
|
8782 ex_drop(exarg_T *eap) |
| 7 | 8783 { |
| 8784 int split = FALSE; | |
| 8785 win_T *wp; | |
| 8786 buf_T *buf; | |
| 735 | 8787 tabpage_T *tp; |
| 7 | 8788 |
| 8789 /* | |
| 8790 * Check if the first argument is already being edited in a window. If | |
| 8791 * so, jump to that window. | |
| 8792 * We would actually need to check all arguments, but that's complicated | |
| 8793 * and mostly only one file is dropped. | |
| 8794 * This also ignores wildcards, since it is very unlikely the user is | |
| 8795 * editing a file name with a wildcard character. | |
| 8796 */ | |
| 735 | 8797 set_arglist(eap->arg); |
| 8798 | |
| 1067 | 8799 /* |
| 8800 * Expanding wildcards may result in an empty argument list. E.g. when | |
| 8801 * editing "foo.pyc" and ".pyc" is in 'wildignore'. Assume that we | |
| 8802 * already did an error message for this. | |
| 8803 */ | |
| 8804 if (ARGCOUNT == 0) | |
| 8805 return; | |
| 8806 | |
| 735 | 8807 if (cmdmod.tab) |
| 8808 { | |
| 8809 /* ":tab drop file ...": open a tab for each argument that isn't | |
| 8810 * edited in a window yet. It's like ":tab all" but without closing | |
| 8811 * windows or tabs. */ | |
| 8812 ex_all(eap); | |
| 8813 } | |
| 8814 else | |
| 8815 { | |
| 8816 /* ":drop file ...": Edit the first argument. Jump to an existing | |
| 8817 * window if possible, edit in current window if the current buffer | |
| 8818 * can be abandoned, otherwise open a new window. */ | |
| 8819 buf = buflist_findnr(ARGLIST[0].ae_fnum); | |
| 8820 | |
| 8821 FOR_ALL_TAB_WINDOWS(tp, wp) | |
| 8822 { | |
| 8823 if (wp->w_buffer == buf) | |
| 7 | 8824 { |
| 825 | 8825 goto_tabpage_win(tp, wp); |
| 7 | 8826 curwin->w_arg_idx = 0; |
| 8827 return; | |
| 8828 } | |
| 8829 } | |
| 735 | 8830 |
| 8831 /* | |
| 8832 * Check whether the current buffer is changed. If so, we will need | |
| 8833 * to split the current window or data could be lost. | |
| 8834 * Skip the check if the 'hidden' option is set, as in this case the | |
| 8835 * buffer won't be lost. | |
| 8836 */ | |
|
11957
bc0fee081e1e
patch 8.0.0858: can exit while a terminal is still running a job
Christian Brabandt <cb@256bit.org>
parents:
11800
diff
changeset
|
8837 if (!buf_hide(curbuf)) |
| 735 | 8838 { |
| 8839 ++emsg_off; | |
| 5464 | 8840 split = check_changed(curbuf, CCGD_AW | CCGD_EXCMD); |
| 735 | 8841 --emsg_off; |
| 8842 } | |
| 8843 | |
| 8844 /* Fake a ":sfirst" or ":first" command edit the first argument. */ | |
| 8845 if (split) | |
| 8846 { | |
| 8847 eap->cmdidx = CMD_sfirst; | |
| 8848 eap->cmd[0] = 's'; | |
| 8849 } | |
| 8850 else | |
| 8851 eap->cmdidx = CMD_first; | |
| 8852 ex_rewind(eap); | |
| 8853 } | |
| 7 | 8854 } |
|
9915
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8855 |
|
9931
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8856 /* |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8857 * Skip over the pattern argument of ":vimgrep /pat/[g][j]". |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8858 * Put the start of the pattern in "*s", unless "s" is NULL. |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8859 * If "flags" is not NULL put the flags in it: VGR_GLOBAL, VGR_NOJUMP. |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8860 * If "s" is not NULL terminate the pattern with a NUL. |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8861 * Return a pointer to the char just past the pattern plus flags. |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8862 */ |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8863 char_u * |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8864 skip_vimgrep_pat(char_u *p, char_u **s, int *flags) |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8865 { |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8866 int c; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8867 |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8868 if (vim_isIDc(*p)) |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8869 { |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8870 /* ":vimgrep pattern fname" */ |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8871 if (s != NULL) |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8872 *s = p; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8873 p = skiptowhite(p); |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8874 if (s != NULL && *p != NUL) |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8875 *p++ = NUL; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8876 } |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8877 else |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8878 { |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8879 /* ":vimgrep /pattern/[g][j] fname" */ |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8880 if (s != NULL) |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8881 *s = p + 1; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8882 c = *p; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8883 p = skip_regexp(p + 1, c, TRUE, NULL); |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8884 if (*p != c) |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8885 return NULL; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8886 |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8887 /* Truncate the pattern. */ |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8888 if (s != NULL) |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8889 *p = NUL; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8890 ++p; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8891 |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8892 /* Find the flags */ |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8893 while (*p == 'g' || *p == 'j') |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8894 { |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8895 if (flags != NULL) |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8896 { |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8897 if (*p == 'g') |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8898 *flags |= VGR_GLOBAL; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8899 else |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8900 *flags |= VGR_NOJUMP; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8901 } |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8902 ++p; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8903 } |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8904 } |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8905 return p; |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8906 } |
|
05bfc3d37efb
commit https://github.com/vim/vim/commit/9baf297c99cc35adb921bee04369499d76438889
Christian Brabandt <cb@256bit.org>
parents:
9915
diff
changeset
|
8907 |
|
9915
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8908 #if defined(FEAT_EVAL) || defined(PROTO) |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8909 /* |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8910 * List v:oldfiles in a nice way. |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8911 */ |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8912 void |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8913 ex_oldfiles(exarg_T *eap UNUSED) |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8914 { |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8915 list_T *l = get_vim_var_list(VV_OLDFILES); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8916 listitem_T *li; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8917 int nr = 0; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8918 char_u *fname; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8919 |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8920 if (l == NULL) |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8921 msg((char_u *)_("No old files")); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8922 else |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8923 { |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8924 msg_start(); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8925 msg_scroll = TRUE; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8926 for (li = l->lv_first; li != NULL && !got_int; li = li->li_next) |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8927 { |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8928 ++nr; |
|
15211
de63593896b3
patch 8.1.0615: get_tv function names are not consistent
Bram Moolenaar <Bram@vim.org>
parents:
15209
diff
changeset
|
8929 fname = tv_get_string(&li->li_tv); |
|
9945
d63a89b526ea
commit https://github.com/vim/vim/commit/d6f2ee32dcfa18c781ef157918b524318a2215a2
Christian Brabandt <cb@256bit.org>
parents:
9931
diff
changeset
|
8930 if (!message_filtered(fname)) |
|
9915
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8931 { |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8932 msg_outnum((long)nr); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8933 MSG_PUTS(": "); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8934 msg_outtrans(fname); |
|
10021
5fc4bec66c33
commit https://github.com/vim/vim/commit/885c00eabe6d1fd757d4f0eb531ad3a15a35ec04
Christian Brabandt <cb@256bit.org>
parents:
9980
diff
changeset
|
8935 msg_clr_eos(); |
|
9915
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8936 msg_putchar('\n'); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8937 out_flush(); /* output one line at a time */ |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8938 ui_breakcheck(); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8939 } |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8940 } |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8941 |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8942 /* Assume "got_int" was set to truncate the listing. */ |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8943 got_int = FALSE; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8944 |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8945 # ifdef FEAT_BROWSE_CMD |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8946 if (cmdmod.browse) |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8947 { |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8948 quit_more = FALSE; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8949 nr = prompt_for_number(FALSE); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8950 msg_starthere(); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8951 if (nr > 0) |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8952 { |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8953 char_u *p = list_find_str(get_vim_var_list(VV_OLDFILES), |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8954 (long)nr); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8955 |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8956 if (p != NULL) |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8957 { |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8958 p = expand_env_save(p); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8959 eap->arg = p; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8960 eap->cmdidx = CMD_edit; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8961 cmdmod.browse = FALSE; |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8962 do_exedit(eap, NULL); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8963 vim_free(p); |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8964 } |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8965 } |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8966 } |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8967 # endif |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8968 } |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8969 } |
|
4da1a3879100
commit https://github.com/vim/vim/commit/e11d61a3b1cdedf3144de697a2b38af62c3a78d8
Christian Brabandt <cb@256bit.org>
parents:
9902
diff
changeset
|
8970 #endif |