Mercurial > vim
annotate src/version.c @ 5148:0ddba00c204d v7.4a.001
updated for version 7.4a.001
Problem: Script to update syntax menu is oudated.
Solution: Add the missing items.
(only changing the version, file was already updated)
author | Bram Moolenaar <bram@vim.org> |
---|---|
date | Sat, 06 Jul 2013 16:23:02 +0200 |
parents | 6ec6b7ff2d43 |
children | 512ee5adb990 |
rev | line source |
---|---|
7 | 1 /* vi:set ts=8 sts=4 sw=4: |
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 #include "vim.h" | |
11 | |
12 #ifdef AMIGA | |
13 # include <time.h> /* for time() */ | |
14 #endif | |
15 | |
16 /* | |
17 * Vim originated from Stevie version 3.6 (Fish disk 217) by GRWalter (Fred) | |
18 * It has been changed beyond recognition since then. | |
19 * | |
26 | 20 * Differences between version 6.x and 7.x can be found with ":help version7". |
7 | 21 * Differences between version 5.x and 6.x can be found with ":help version6". |
22 * Differences between version 4.x and 5.x can be found with ":help version5". | |
23 * Differences between version 3.0 and 4.x can be found with ":help version4". | |
24 * All the remarks about older versions have been removed, they are not very | |
25 * interesting. | |
26 */ | |
27 | |
28 #include "version.h" | |
29 | |
378 | 30 char *Version = VIM_VERSION_SHORT; |
31 static char *mediumVersion = VIM_VERSION_MEDIUM; | |
7 | 32 |
33 #if defined(HAVE_DATE_TIME) || defined(PROTO) | |
34 # if (defined(VMS) && defined(VAXC)) || defined(PROTO) | |
35 char longVersion[sizeof(VIM_VERSION_LONG_DATE) + sizeof(__DATE__) | |
36 + sizeof(__TIME__) + 3]; | |
4147 | 37 |
38 static void list_features __ARGS((void)); | |
39 | |
7 | 40 void |
41 make_version() | |
42 { | |
43 /* | |
44 * Construct the long version string. Necessary because | |
45 * VAX C can't catenate strings in the preprocessor. | |
46 */ | |
47 strcpy(longVersion, VIM_VERSION_LONG_DATE); | |
48 strcat(longVersion, __DATE__); | |
49 strcat(longVersion, " "); | |
50 strcat(longVersion, __TIME__); | |
51 strcat(longVersion, ")"); | |
52 } | |
53 # else | |
54 char *longVersion = VIM_VERSION_LONG_DATE __DATE__ " " __TIME__ ")"; | |
55 # endif | |
56 #else | |
57 char *longVersion = VIM_VERSION_LONG; | |
58 #endif | |
59 | |
60 static void version_msg __ARGS((char *s)); | |
61 | |
62 static char *(features[]) = | |
63 { | |
64 #ifdef AMIGA /* only for Amiga systems */ | |
65 # ifdef FEAT_ARP | |
66 "+ARP", | |
67 # else | |
68 "-ARP", | |
69 # endif | |
70 #endif | |
71 #ifdef FEAT_ARABIC | |
72 "+arabic", | |
73 #else | |
74 "-arabic", | |
75 #endif | |
76 #ifdef FEAT_AUTOCMD | |
77 "+autocmd", | |
78 #else | |
79 "-autocmd", | |
80 #endif | |
81 #ifdef FEAT_BEVAL | |
82 "+balloon_eval", | |
83 #else | |
84 "-balloon_eval", | |
85 #endif | |
86 #ifdef FEAT_BROWSE | |
87 "+browse", | |
88 #else | |
89 "-browse", | |
90 #endif | |
91 #ifdef NO_BUILTIN_TCAPS | |
92 "-builtin_terms", | |
93 #endif | |
94 #ifdef SOME_BUILTIN_TCAPS | |
95 "+builtin_terms", | |
96 #endif | |
97 #ifdef ALL_BUILTIN_TCAPS | |
98 "++builtin_terms", | |
99 #endif | |
100 #ifdef FEAT_BYTEOFF | |
101 "+byte_offset", | |
102 #else | |
103 "-byte_offset", | |
104 #endif | |
105 #ifdef FEAT_CINDENT | |
106 "+cindent", | |
107 #else | |
108 "-cindent", | |
109 #endif | |
110 #ifdef FEAT_CLIENTSERVER | |
111 "+clientserver", | |
112 #else | |
113 "-clientserver", | |
114 #endif | |
115 #ifdef FEAT_CLIPBOARD | |
116 "+clipboard", | |
117 #else | |
118 "-clipboard", | |
119 #endif | |
120 #ifdef FEAT_CMDL_COMPL | |
121 "+cmdline_compl", | |
122 #else | |
123 "-cmdline_compl", | |
124 #endif | |
125 #ifdef FEAT_CMDHIST | |
126 "+cmdline_hist", | |
127 #else | |
128 "-cmdline_hist", | |
129 #endif | |
130 #ifdef FEAT_CMDL_INFO | |
131 "+cmdline_info", | |
132 #else | |
133 "-cmdline_info", | |
134 #endif | |
135 #ifdef FEAT_COMMENTS | |
136 "+comments", | |
137 #else | |
138 "-comments", | |
139 #endif | |
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
140 #ifdef FEAT_CONCEAL |
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
141 "+conceal", |
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
142 #else |
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
143 "-conceal", |
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
144 #endif |
7 | 145 #ifdef FEAT_CRYPT |
146 "+cryptv", | |
147 #else | |
148 "-cryptv", | |
149 #endif | |
150 #ifdef FEAT_CSCOPE | |
151 "+cscope", | |
152 #else | |
153 "-cscope", | |
154 #endif | |
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
155 #ifdef FEAT_CURSORBIND |
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
156 "+cursorbind", |
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
157 #else |
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
158 "-cursorbind", |
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
159 #endif |
647 | 160 #ifdef CURSOR_SHAPE |
161 "+cursorshape", | |
162 #else | |
163 "-cursorshape", | |
164 #endif | |
7 | 165 #if defined(FEAT_CON_DIALOG) && defined(FEAT_GUI_DIALOG) |
166 "+dialog_con_gui", | |
167 #else | |
168 # if defined(FEAT_CON_DIALOG) | |
169 "+dialog_con", | |
170 # else | |
171 # if defined(FEAT_GUI_DIALOG) | |
172 "+dialog_gui", | |
173 # else | |
174 "-dialog", | |
175 # endif | |
176 # endif | |
177 #endif | |
178 #ifdef FEAT_DIFF | |
179 "+diff", | |
180 #else | |
181 "-diff", | |
182 #endif | |
183 #ifdef FEAT_DIGRAPHS | |
184 "+digraphs", | |
185 #else | |
186 "-digraphs", | |
187 #endif | |
188 #ifdef FEAT_DND | |
189 "+dnd", | |
190 #else | |
191 "-dnd", | |
192 #endif | |
193 #ifdef EBCDIC | |
194 "+ebcdic", | |
195 #else | |
196 "-ebcdic", | |
197 #endif | |
198 #ifdef FEAT_EMACS_TAGS | |
199 "+emacs_tags", | |
200 #else | |
201 "-emacs_tags", | |
202 #endif | |
203 #ifdef FEAT_EVAL | |
204 "+eval", | |
205 #else | |
206 "-eval", | |
207 #endif | |
208 #ifdef FEAT_EX_EXTRA | |
209 "+ex_extra", | |
210 #else | |
211 "-ex_extra", | |
212 #endif | |
213 #ifdef FEAT_SEARCH_EXTRA | |
214 "+extra_search", | |
215 #else | |
216 "-extra_search", | |
217 #endif | |
218 #ifdef FEAT_FKMAP | |
219 "+farsi", | |
220 #else | |
221 "-farsi", | |
222 #endif | |
223 #ifdef FEAT_SEARCHPATH | |
224 "+file_in_path", | |
225 #else | |
226 "-file_in_path", | |
227 #endif | |
228 #ifdef FEAT_FIND_ID | |
229 "+find_in_path", | |
230 #else | |
231 "-find_in_path", | |
232 #endif | |
1621 | 233 #ifdef FEAT_FLOAT |
234 "+float", | |
235 #else | |
236 "-float", | |
237 #endif | |
7 | 238 #ifdef FEAT_FOLDING |
239 "+folding", | |
240 #else | |
241 "-folding", | |
242 #endif | |
243 #ifdef FEAT_FOOTER | |
244 "+footer", | |
245 #else | |
246 "-footer", | |
247 #endif | |
248 /* only interesting on Unix systems */ | |
249 #if !defined(USE_SYSTEM) && defined(UNIX) | |
250 "+fork()", | |
251 #endif | |
252 #ifdef FEAT_GETTEXT | |
253 # ifdef DYNAMIC_GETTEXT | |
254 "+gettext/dyn", | |
255 # else | |
256 "+gettext", | |
257 # endif | |
258 #else | |
259 "-gettext", | |
260 #endif | |
261 #ifdef FEAT_HANGULIN | |
262 "+hangul_input", | |
263 #else | |
264 "-hangul_input", | |
265 #endif | |
266 #if (defined(HAVE_ICONV_H) && defined(USE_ICONV)) || defined(DYNAMIC_ICONV) | |
267 # ifdef DYNAMIC_ICONV | |
268 "+iconv/dyn", | |
269 # else | |
270 "+iconv", | |
271 # endif | |
272 #else | |
273 "-iconv", | |
274 #endif | |
275 #ifdef FEAT_INS_EXPAND | |
276 "+insert_expand", | |
277 #else | |
278 "-insert_expand", | |
279 #endif | |
280 #ifdef FEAT_JUMPLIST | |
281 "+jumplist", | |
282 #else | |
283 "-jumplist", | |
284 #endif | |
285 #ifdef FEAT_KEYMAP | |
286 "+keymap", | |
287 #else | |
288 "-keymap", | |
289 #endif | |
290 #ifdef FEAT_LANGMAP | |
291 "+langmap", | |
292 #else | |
293 "-langmap", | |
294 #endif | |
295 #ifdef FEAT_LIBCALL | |
296 "+libcall", | |
297 #else | |
298 "-libcall", | |
299 #endif | |
300 #ifdef FEAT_LINEBREAK | |
301 "+linebreak", | |
302 #else | |
303 "-linebreak", | |
304 #endif | |
305 #ifdef FEAT_LISP | |
306 "+lispindent", | |
307 #else | |
308 "-lispindent", | |
309 #endif | |
310 #ifdef FEAT_LISTCMDS | |
311 "+listcmds", | |
312 #else | |
313 "-listcmds", | |
314 #endif | |
315 #ifdef FEAT_LOCALMAP | |
316 "+localmap", | |
317 #else | |
318 "-localmap", | |
319 #endif | |
2320
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
320 #ifdef FEAT_LUA |
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
321 # ifdef DYNAMIC_LUA |
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
322 "+lua/dyn", |
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
323 # else |
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
324 "+lua", |
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
325 # endif |
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
326 #else |
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
327 "-lua", |
966a5609669e
Added Lua interfae. (Luis Carvalho)
Bram Moolenaar <bram@vim.org>
parents:
2275
diff
changeset
|
328 #endif |
7 | 329 #ifdef FEAT_MENU |
330 "+menu", | |
331 #else | |
332 "-menu", | |
333 #endif | |
334 #ifdef FEAT_SESSION | |
335 "+mksession", | |
336 #else | |
337 "-mksession", | |
338 #endif | |
339 #ifdef FEAT_MODIFY_FNAME | |
340 "+modify_fname", | |
341 #else | |
342 "-modify_fname", | |
343 #endif | |
344 #ifdef FEAT_MOUSE | |
345 "+mouse", | |
346 # ifdef FEAT_MOUSESHAPE | |
347 "+mouseshape", | |
348 # else | |
349 "-mouseshape", | |
350 # endif | |
351 # else | |
352 "-mouse", | |
353 #endif | |
3898 | 354 |
7 | 355 #if defined(UNIX) || defined(VMS) |
356 # ifdef FEAT_MOUSE_DEC | |
357 "+mouse_dec", | |
358 # else | |
359 "-mouse_dec", | |
360 # endif | |
361 # ifdef FEAT_MOUSE_GPM | |
362 "+mouse_gpm", | |
363 # else | |
364 "-mouse_gpm", | |
365 # endif | |
366 # ifdef FEAT_MOUSE_JSB | |
367 "+mouse_jsbterm", | |
368 # else | |
369 "-mouse_jsbterm", | |
370 # endif | |
371 # ifdef FEAT_MOUSE_NET | |
372 "+mouse_netterm", | |
373 # else | |
374 "-mouse_netterm", | |
375 # endif | |
376 #endif | |
3898 | 377 |
7 | 378 #ifdef __QNX__ |
379 # ifdef FEAT_MOUSE_PTERM | |
380 "+mouse_pterm", | |
381 # else | |
382 "-mouse_pterm", | |
383 # endif | |
384 #endif | |
3898 | 385 |
386 #if defined(UNIX) || defined(VMS) | |
387 # ifdef FEAT_MOUSE_SGR | |
388 "+mouse_sgr", | |
389 # else | |
390 "-mouse_sgr", | |
391 # endif | |
392 # ifdef FEAT_SYSMOUSE | |
393 "+mouse_sysmouse", | |
394 # else | |
395 "-mouse_sysmouse", | |
396 # endif | |
397 # ifdef FEAT_MOUSE_URXVT | |
398 "+mouse_urxvt", | |
399 # else | |
400 "-mouse_urxvt", | |
401 # endif | |
402 # ifdef FEAT_MOUSE_XTERM | |
403 "+mouse_xterm", | |
404 # else | |
405 "-mouse_xterm", | |
406 # endif | |
407 #endif | |
408 | |
7 | 409 #ifdef FEAT_MBYTE_IME |
410 # ifdef DYNAMIC_IME | |
411 "+multi_byte_ime/dyn", | |
412 # else | |
413 "+multi_byte_ime", | |
414 # endif | |
415 #else | |
416 # ifdef FEAT_MBYTE | |
417 "+multi_byte", | |
418 # else | |
419 "-multi_byte", | |
420 # endif | |
421 #endif | |
422 #ifdef FEAT_MULTI_LANG | |
423 "+multi_lang", | |
424 #else | |
425 "-multi_lang", | |
426 #endif | |
14 | 427 #ifdef FEAT_MZSCHEME |
132 | 428 # ifdef DYNAMIC_MZSCHEME |
429 "+mzscheme/dyn", | |
430 # else | |
14 | 431 "+mzscheme", |
132 | 432 # endif |
14 | 433 #else |
434 "-mzscheme", | |
435 #endif | |
7 | 436 #ifdef FEAT_NETBEANS_INTG |
437 "+netbeans_intg", | |
438 #else | |
439 "-netbeans_intg", | |
440 #endif | |
441 #ifdef FEAT_GUI_W32 | |
442 # ifdef FEAT_OLE | |
443 "+ole", | |
444 # else | |
445 "-ole", | |
446 # endif | |
447 #endif | |
448 #ifdef FEAT_PATH_EXTRA | |
449 "+path_extra", | |
450 #else | |
451 "-path_extra", | |
452 #endif | |
453 #ifdef FEAT_PERL | |
454 # ifdef DYNAMIC_PERL | |
455 "+perl/dyn", | |
456 # else | |
457 "+perl", | |
458 # endif | |
459 #else | |
460 "-perl", | |
461 #endif | |
2214
f8222d1f9a73
Included patch for persistent undo. Lots of changes and added test.
Bram Moolenaar <bram@vim.org>
parents:
2154
diff
changeset
|
462 #ifdef FEAT_PERSISTENT_UNDO |
f8222d1f9a73
Included patch for persistent undo. Lots of changes and added test.
Bram Moolenaar <bram@vim.org>
parents:
2154
diff
changeset
|
463 "+persistent_undo", |
f8222d1f9a73
Included patch for persistent undo. Lots of changes and added test.
Bram Moolenaar <bram@vim.org>
parents:
2154
diff
changeset
|
464 #else |
f8222d1f9a73
Included patch for persistent undo. Lots of changes and added test.
Bram Moolenaar <bram@vim.org>
parents:
2154
diff
changeset
|
465 "-persistent_undo", |
f8222d1f9a73
Included patch for persistent undo. Lots of changes and added test.
Bram Moolenaar <bram@vim.org>
parents:
2154
diff
changeset
|
466 #endif |
7 | 467 #ifdef FEAT_PRINTER |
468 # ifdef FEAT_POSTSCRIPT | |
469 "+postscript", | |
470 # else | |
471 "-postscript", | |
472 # endif | |
473 "+printer", | |
474 #else | |
475 "-printer", | |
476 #endif | |
170 | 477 #ifdef FEAT_PROFILE |
478 "+profile", | |
479 #else | |
480 "-profile", | |
481 #endif | |
7 | 482 #ifdef FEAT_PYTHON |
483 # ifdef DYNAMIC_PYTHON | |
484 "+python/dyn", | |
485 # else | |
486 "+python", | |
487 # endif | |
488 #else | |
489 "-python", | |
490 #endif | |
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
491 #ifdef FEAT_PYTHON3 |
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
492 # ifdef DYNAMIC_PYTHON3 |
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
493 "+python3/dyn", |
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
494 # else |
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
495 "+python3", |
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
496 # endif |
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
497 #else |
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
498 "-python3", |
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2320
diff
changeset
|
499 #endif |
7 | 500 #ifdef FEAT_QUICKFIX |
501 "+quickfix", | |
502 #else | |
503 "-quickfix", | |
504 #endif | |
857 | 505 #ifdef FEAT_RELTIME |
506 "+reltime", | |
507 #else | |
508 "-reltime", | |
509 #endif | |
7 | 510 #ifdef FEAT_RIGHTLEFT |
511 "+rightleft", | |
512 #else | |
513 "-rightleft", | |
514 #endif | |
515 #ifdef FEAT_RUBY | |
516 # ifdef DYNAMIC_RUBY | |
517 "+ruby/dyn", | |
518 # else | |
519 "+ruby", | |
520 # endif | |
521 #else | |
522 "-ruby", | |
523 #endif | |
524 #ifdef FEAT_SCROLLBIND | |
525 "+scrollbind", | |
526 #else | |
527 "-scrollbind", | |
528 #endif | |
529 #ifdef FEAT_SIGNS | |
530 "+signs", | |
531 #else | |
532 "-signs", | |
533 #endif | |
534 #ifdef FEAT_SMARTINDENT | |
535 "+smartindent", | |
536 #else | |
537 "-smartindent", | |
538 #endif | |
539 #ifdef FEAT_SNIFF | |
540 "+sniff", | |
541 #else | |
542 "-sniff", | |
543 #endif | |
1989 | 544 #ifdef STARTUPTIME |
545 "+startuptime", | |
546 #else | |
547 "-startuptime", | |
548 #endif | |
7 | 549 #ifdef FEAT_STL_OPT |
550 "+statusline", | |
551 #else | |
552 "-statusline", | |
553 #endif | |
554 #ifdef FEAT_SUN_WORKSHOP | |
555 "+sun_workshop", | |
556 #else | |
557 "-sun_workshop", | |
558 #endif | |
559 #ifdef FEAT_SYN_HL | |
560 "+syntax", | |
561 #else | |
562 "-syntax", | |
563 #endif | |
564 /* only interesting on Unix systems */ | |
565 #if defined(USE_SYSTEM) && (defined(UNIX) || defined(__EMX__)) | |
566 "+system()", | |
567 #endif | |
568 #ifdef FEAT_TAG_BINS | |
569 "+tag_binary", | |
570 #else | |
571 "-tag_binary", | |
572 #endif | |
573 #ifdef FEAT_TAG_OLDSTATIC | |
574 "+tag_old_static", | |
575 #else | |
576 "-tag_old_static", | |
577 #endif | |
578 #ifdef FEAT_TAG_ANYWHITE | |
579 "+tag_any_white", | |
580 #else | |
581 "-tag_any_white", | |
582 #endif | |
583 #ifdef FEAT_TCL | |
584 # ifdef DYNAMIC_TCL | |
585 "+tcl/dyn", | |
586 # else | |
587 "+tcl", | |
588 # endif | |
589 #else | |
590 "-tcl", | |
591 #endif | |
592 #if defined(UNIX) || defined(__EMX__) | |
593 /* only Unix (or OS/2 with EMX!) can have terminfo instead of termcap */ | |
594 # ifdef TERMINFO | |
595 "+terminfo", | |
596 # else | |
597 "-terminfo", | |
598 # endif | |
599 #else /* unix always includes termcap support */ | |
600 # ifdef HAVE_TGETENT | |
601 "+tgetent", | |
602 # else | |
603 "-tgetent", | |
604 # endif | |
605 #endif | |
606 #ifdef FEAT_TERMRESPONSE | |
607 "+termresponse", | |
608 #else | |
609 "-termresponse", | |
610 #endif | |
611 #ifdef FEAT_TEXTOBJ | |
612 "+textobjects", | |
613 #else | |
614 "-textobjects", | |
615 #endif | |
616 #ifdef FEAT_TITLE | |
617 "+title", | |
618 #else | |
619 "-title", | |
620 #endif | |
621 #ifdef FEAT_TOOLBAR | |
622 "+toolbar", | |
623 #else | |
624 "-toolbar", | |
625 #endif | |
626 #ifdef FEAT_USR_CMDS | |
627 "+user_commands", | |
628 #else | |
629 "-user_commands", | |
630 #endif | |
631 #ifdef FEAT_VERTSPLIT | |
632 "+vertsplit", | |
633 #else | |
634 "-vertsplit", | |
635 #endif | |
636 #ifdef FEAT_VIRTUALEDIT | |
637 "+virtualedit", | |
638 #else | |
639 "-virtualedit", | |
640 #endif | |
641 #ifdef FEAT_VISUAL | |
642 "+visual", | |
643 # ifdef FEAT_VISUALEXTRA | |
644 "+visualextra", | |
645 # else | |
646 "-visualextra", | |
647 # endif | |
648 #else | |
649 "-visual", | |
650 #endif | |
651 #ifdef FEAT_VIMINFO | |
652 "+viminfo", | |
653 #else | |
654 "-viminfo", | |
655 #endif | |
656 #ifdef FEAT_VREPLACE | |
657 "+vreplace", | |
658 #else | |
659 "-vreplace", | |
660 #endif | |
661 #ifdef FEAT_WILDIGN | |
662 "+wildignore", | |
663 #else | |
664 "-wildignore", | |
665 #endif | |
666 #ifdef FEAT_WILDMENU | |
667 "+wildmenu", | |
668 #else | |
669 "-wildmenu", | |
670 #endif | |
671 #ifdef FEAT_WINDOWS | |
672 "+windows", | |
673 #else | |
674 "-windows", | |
675 #endif | |
676 #ifdef FEAT_WRITEBACKUP | |
677 "+writebackup", | |
678 #else | |
679 "-writebackup", | |
680 #endif | |
681 #if defined(UNIX) || defined(VMS) | |
682 # ifdef FEAT_X11 | |
683 "+X11", | |
684 # else | |
685 "-X11", | |
686 # endif | |
687 #endif | |
688 #ifdef FEAT_XFONTSET | |
689 "+xfontset", | |
690 #else | |
691 "-xfontset", | |
692 #endif | |
693 #ifdef FEAT_XIM | |
694 "+xim", | |
695 #else | |
696 "-xim", | |
697 #endif | |
698 #if defined(UNIX) || defined(VMS) | |
699 # ifdef USE_XSMP_INTERACT | |
700 "+xsmp_interact", | |
701 # else | |
702 # ifdef USE_XSMP | |
703 "+xsmp", | |
704 # else | |
705 "-xsmp", | |
706 # endif | |
707 # endif | |
708 # ifdef FEAT_XCLIPBOARD | |
709 "+xterm_clipboard", | |
710 # else | |
711 "-xterm_clipboard", | |
712 # endif | |
713 #endif | |
714 #ifdef FEAT_XTERM_SAVE | |
715 "+xterm_save", | |
716 #else | |
717 "-xterm_save", | |
718 #endif | |
719 #ifdef WIN3264 | |
720 # ifdef FEAT_XPM_W32 | |
721 "+xpm_w32", | |
722 # else | |
723 "-xpm_w32", | |
724 # endif | |
725 #endif | |
726 NULL | |
727 }; | |
728 | |
729 static int included_patches[] = | |
730 { /* Add new patch number below this line */ | |
731 /**/ | |
5148
0ddba00c204d
updated for version 7.4a.001
Bram Moolenaar <bram@vim.org>
parents:
5146
diff
changeset
|
732 1, |
0ddba00c204d
updated for version 7.4a.001
Bram Moolenaar <bram@vim.org>
parents:
5146
diff
changeset
|
733 /**/ |
0ddba00c204d
updated for version 7.4a.001
Bram Moolenaar <bram@vim.org>
parents:
5146
diff
changeset
|
734 1, |
0ddba00c204d
updated for version 7.4a.001
Bram Moolenaar <bram@vim.org>
parents:
5146
diff
changeset
|
735 /**/ |
7 | 736 0 |
737 }; | |
738 | |
1760 | 739 /* |
740 * Place to put a short description when adding a feature with a patch. | |
741 * Keep it short, e.g.,: "relative numbers", "persistent undo". | |
742 * Also add a comment marker to separate the lines. | |
743 * See the official Vim patches for the diff format: It must use a context of | |
1777 | 744 * one line only. Create it by hand or use "diff -C2" and edit the patch. |
1760 | 745 */ |
746 static char *(extra_patches[]) = | |
747 { /* Add your patch description below this line */ | |
748 /**/ | |
749 NULL | |
750 }; | |
751 | |
7 | 752 int |
753 highest_patch() | |
754 { | |
755 int i; | |
756 int h = 0; | |
757 | |
758 for (i = 0; included_patches[i] != 0; ++i) | |
759 if (included_patches[i] > h) | |
760 h = included_patches[i]; | |
761 return h; | |
762 } | |
763 | |
764 #if defined(FEAT_EVAL) || defined(PROTO) | |
765 /* | |
766 * Return TRUE if patch "n" has been included. | |
767 */ | |
768 int | |
769 has_patch(n) | |
770 int n; | |
771 { | |
772 int i; | |
773 | |
774 for (i = 0; included_patches[i] != 0; ++i) | |
775 if (included_patches[i] == n) | |
776 return TRUE; | |
777 return FALSE; | |
778 } | |
779 #endif | |
780 | |
781 void | |
782 ex_version(eap) | |
783 exarg_T *eap; | |
784 { | |
785 /* | |
786 * Ignore a ":version 9.99" command. | |
787 */ | |
788 if (*eap->arg == NUL) | |
789 { | |
790 msg_putchar('\n'); | |
791 list_version(); | |
792 } | |
793 } | |
794 | |
4147 | 795 /* |
796 * List all features aligned in columns, dictionary style. | |
797 */ | |
798 static void | |
799 list_features() | |
800 { | |
801 int i; | |
802 int ncol; | |
803 int nrow; | |
804 int nfeat = 0; | |
805 int width = 0; | |
806 | |
807 /* Find the length of the longest feature name, use that + 1 as the column | |
808 * width */ | |
809 for (i = 0; features[i] != NULL; ++i) | |
810 { | |
4160 | 811 int l = (int)STRLEN(features[i]); |
4147 | 812 |
813 if (l > width) | |
814 width = l; | |
815 ++nfeat; | |
816 } | |
817 width += 1; | |
818 | |
819 if (Columns < width) | |
820 { | |
821 /* Not enough screen columns - show one per line */ | |
822 for (i = 0; features[i] != NULL; ++i) | |
823 { | |
824 version_msg(features[i]); | |
825 if (msg_col > 0) | |
826 msg_putchar('\n'); | |
827 } | |
828 return; | |
829 } | |
830 | |
831 /* The rightmost column doesn't need a separator. | |
832 * Sacrifice it to fit in one more column if possible. */ | |
4170 | 833 ncol = (int) (Columns + 1) / width; |
4147 | 834 nrow = nfeat / ncol + (nfeat % ncol ? 1 : 0); |
835 | |
4170 | 836 /* i counts columns then rows. idx counts rows then columns. */ |
4147 | 837 for (i = 0; !got_int && i < nrow * ncol; ++i) |
838 { | |
839 int idx = (i / ncol) + (i % ncol) * nrow; | |
840 | |
841 if (idx < nfeat) | |
842 { | |
843 int last_col = (i + 1) % ncol == 0; | |
844 | |
845 msg_puts((char_u *)features[idx]); | |
846 if (last_col) | |
847 { | |
848 if (msg_col > 0) | |
849 msg_putchar('\n'); | |
850 } | |
851 else | |
852 { | |
853 while (msg_col % width) | |
854 msg_putchar(' '); | |
855 } | |
856 } | |
857 else | |
4170 | 858 { |
859 if (msg_col > 0) | |
860 msg_putchar('\n'); | |
861 } | |
4147 | 862 } |
863 } | |
4160 | 864 |
7 | 865 void |
866 list_version() | |
867 { | |
868 int i; | |
869 int first; | |
870 char *s = ""; | |
871 | |
872 /* | |
873 * When adding features here, don't forget to update the list of | |
874 * internal variables in eval.c! | |
875 */ | |
876 MSG(longVersion); | |
877 #ifdef WIN3264 | |
878 # ifdef FEAT_GUI_W32 | |
879 # if defined(_MSC_VER) && (_MSC_VER <= 1010) | |
880 /* Only MS VC 4.1 and earlier can do Win32s */ | |
1607 | 881 MSG_PUTS(_("\nMS-Windows 16/32-bit GUI version")); |
7 | 882 # else |
990 | 883 # ifdef _WIN64 |
1607 | 884 MSG_PUTS(_("\nMS-Windows 64-bit GUI version")); |
990 | 885 # else |
1607 | 886 MSG_PUTS(_("\nMS-Windows 32-bit GUI version")); |
990 | 887 # endif |
7 | 888 # endif |
889 if (gui_is_win32s()) | |
890 MSG_PUTS(_(" in Win32s mode")); | |
891 # ifdef FEAT_OLE | |
892 MSG_PUTS(_(" with OLE support")); | |
893 # endif | |
894 # else | |
1607 | 895 # ifdef _WIN64 |
896 MSG_PUTS(_("\nMS-Windows 64-bit console version")); | |
897 # else | |
898 MSG_PUTS(_("\nMS-Windows 32-bit console version")); | |
899 # endif | |
7 | 900 # endif |
901 #endif | |
902 #ifdef WIN16 | |
1607 | 903 MSG_PUTS(_("\nMS-Windows 16-bit version")); |
7 | 904 #endif |
905 #ifdef MSDOS | |
906 # ifdef DJGPP | |
1607 | 907 MSG_PUTS(_("\n32-bit MS-DOS version")); |
7 | 908 # else |
1607 | 909 MSG_PUTS(_("\n16-bit MS-DOS version")); |
7 | 910 # endif |
911 #endif | |
912 #ifdef MACOS | |
913 # ifdef MACOS_X | |
914 # ifdef MACOS_X_UNIX | |
915 MSG_PUTS(_("\nMacOS X (unix) version")); | |
916 # else | |
917 MSG_PUTS(_("\nMacOS X version")); | |
918 # endif | |
919 #else | |
920 MSG_PUTS(_("\nMacOS version")); | |
921 # endif | |
922 #endif | |
923 | |
924 #ifdef VMS | |
1705 | 925 MSG_PUTS(_("\nOpenVMS version")); |
1045 | 926 # ifdef HAVE_PATHDEF |
927 if (*compiled_arch != NUL) | |
928 { | |
929 MSG_PUTS(" - "); | |
930 MSG_PUTS(compiled_arch); | |
931 } | |
932 # endif | |
933 | |
7 | 934 #endif |
935 | |
936 /* Print the list of patch numbers if there is at least one. */ | |
937 /* Print a range when patches are consecutive: "1-10, 12, 15-40, 42-45" */ | |
938 if (included_patches[0] != 0) | |
939 { | |
940 MSG_PUTS(_("\nIncluded patches: ")); | |
941 first = -1; | |
942 /* find last one */ | |
943 for (i = 0; included_patches[i] != 0; ++i) | |
944 ; | |
945 while (--i >= 0) | |
946 { | |
947 if (first < 0) | |
948 first = included_patches[i]; | |
949 if (i == 0 || included_patches[i - 1] != included_patches[i] + 1) | |
950 { | |
951 MSG_PUTS(s); | |
952 s = ", "; | |
953 msg_outnum((long)first); | |
954 if (first != included_patches[i]) | |
955 { | |
956 MSG_PUTS("-"); | |
957 msg_outnum((long)included_patches[i]); | |
958 } | |
959 first = -1; | |
960 } | |
961 } | |
962 } | |
963 | |
1760 | 964 /* Print the list of extra patch descriptions if there is at least one. */ |
965 if (extra_patches[0] != NULL) | |
966 { | |
967 MSG_PUTS(_("\nExtra patches: ")); | |
968 s = ""; | |
969 for (i = 0; extra_patches[i] != NULL; ++i) | |
970 { | |
971 MSG_PUTS(s); | |
972 s = ", "; | |
973 MSG_PUTS(extra_patches[i]); | |
974 } | |
975 } | |
976 | |
7 | 977 #ifdef MODIFIED_BY |
978 MSG_PUTS("\n"); | |
979 MSG_PUTS(_("Modified by ")); | |
980 MSG_PUTS(MODIFIED_BY); | |
981 #endif | |
982 | |
983 #ifdef HAVE_PATHDEF | |
984 if (*compiled_user != NUL || *compiled_sys != NUL) | |
985 { | |
986 MSG_PUTS(_("\nCompiled ")); | |
987 if (*compiled_user != NUL) | |
988 { | |
989 MSG_PUTS(_("by ")); | |
990 MSG_PUTS(compiled_user); | |
991 } | |
992 if (*compiled_sys != NUL) | |
993 { | |
994 MSG_PUTS("@"); | |
995 MSG_PUTS(compiled_sys); | |
996 } | |
997 } | |
998 #endif | |
999 | |
1000 #ifdef FEAT_HUGE | |
1001 MSG_PUTS(_("\nHuge version ")); | |
1002 #else | |
1003 # ifdef FEAT_BIG | |
1004 MSG_PUTS(_("\nBig version ")); | |
1005 # else | |
1006 # ifdef FEAT_NORMAL | |
1007 MSG_PUTS(_("\nNormal version ")); | |
1008 # else | |
1009 # ifdef FEAT_SMALL | |
1010 MSG_PUTS(_("\nSmall version ")); | |
1011 # else | |
1012 MSG_PUTS(_("\nTiny version ")); | |
1013 # endif | |
1014 # endif | |
1015 # endif | |
1016 #endif | |
1017 #ifndef FEAT_GUI | |
1018 MSG_PUTS(_("without GUI.")); | |
1019 #else | |
1020 # ifdef FEAT_GUI_GTK | |
1021 # ifdef FEAT_GUI_GNOME | |
1022 MSG_PUTS(_("with GTK2-GNOME GUI.")); | |
1023 # else | |
1024 MSG_PUTS(_("with GTK2 GUI.")); | |
1025 # endif | |
1026 # else | |
1027 # ifdef FEAT_GUI_MOTIF | |
1028 MSG_PUTS(_("with X11-Motif GUI.")); | |
1029 # else | |
1030 # ifdef FEAT_GUI_ATHENA | |
1031 # ifdef FEAT_GUI_NEXTAW | |
1032 MSG_PUTS(_("with X11-neXtaw GUI.")); | |
1033 # else | |
1034 MSG_PUTS(_("with X11-Athena GUI.")); | |
1035 # endif | |
1036 # else | |
1037 # ifdef FEAT_GUI_PHOTON | |
1038 MSG_PUTS(_("with Photon GUI.")); | |
1039 # else | |
1040 # if defined(MSWIN) | |
1041 MSG_PUTS(_("with GUI.")); | |
1042 # else | |
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
1043 # if defined(TARGET_API_MAC_CARBON) && TARGET_API_MAC_CARBON |
7 | 1044 MSG_PUTS(_("with Carbon GUI.")); |
1045 # else | |
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
1046 # if defined(TARGET_API_MAC_OSX) && TARGET_API_MAC_OSX |
7 | 1047 MSG_PUTS(_("with Cocoa GUI.")); |
1048 # else | |
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2214
diff
changeset
|
1049 # if defined(MACOS) |
7 | 1050 MSG_PUTS(_("with (classic) GUI.")); |
1051 # endif | |
1052 # endif | |
1053 # endif | |
1054 # endif | |
1055 # endif | |
1056 # endif | |
1057 # endif | |
1058 # endif | |
1059 #endif | |
1060 version_msg(_(" Features included (+) or not (-):\n")); | |
1061 | |
4147 | 1062 list_features(); |
7 | 1063 |
1064 #ifdef SYS_VIMRC_FILE | |
1065 version_msg(_(" system vimrc file: \"")); | |
1066 version_msg(SYS_VIMRC_FILE); | |
1067 version_msg("\"\n"); | |
1068 #endif | |
1069 #ifdef USR_VIMRC_FILE | |
1070 version_msg(_(" user vimrc file: \"")); | |
1071 version_msg(USR_VIMRC_FILE); | |
1072 version_msg("\"\n"); | |
1073 #endif | |
1074 #ifdef USR_VIMRC_FILE2 | |
1075 version_msg(_(" 2nd user vimrc file: \"")); | |
1076 version_msg(USR_VIMRC_FILE2); | |
1077 version_msg("\"\n"); | |
1078 #endif | |
1079 #ifdef USR_VIMRC_FILE3 | |
1080 version_msg(_(" 3rd user vimrc file: \"")); | |
1081 version_msg(USR_VIMRC_FILE3); | |
1082 version_msg("\"\n"); | |
1083 #endif | |
1084 #ifdef USR_EXRC_FILE | |
1085 version_msg(_(" user exrc file: \"")); | |
1086 version_msg(USR_EXRC_FILE); | |
1087 version_msg("\"\n"); | |
1088 #endif | |
1089 #ifdef USR_EXRC_FILE2 | |
1090 version_msg(_(" 2nd user exrc file: \"")); | |
1091 version_msg(USR_EXRC_FILE2); | |
1092 version_msg("\"\n"); | |
1093 #endif | |
1094 #ifdef FEAT_GUI | |
1095 # ifdef SYS_GVIMRC_FILE | |
1096 version_msg(_(" system gvimrc file: \"")); | |
1097 version_msg(SYS_GVIMRC_FILE); | |
1098 version_msg("\"\n"); | |
1099 # endif | |
1100 version_msg(_(" user gvimrc file: \"")); | |
1101 version_msg(USR_GVIMRC_FILE); | |
1102 version_msg("\"\n"); | |
1103 # ifdef USR_GVIMRC_FILE2 | |
1104 version_msg(_("2nd user gvimrc file: \"")); | |
1105 version_msg(USR_GVIMRC_FILE2); | |
1106 version_msg("\"\n"); | |
1107 # endif | |
1108 # ifdef USR_GVIMRC_FILE3 | |
1109 version_msg(_("3rd user gvimrc file: \"")); | |
1110 version_msg(USR_GVIMRC_FILE3); | |
1111 version_msg("\"\n"); | |
1112 # endif | |
1113 #endif | |
1114 #ifdef FEAT_GUI | |
1115 # ifdef SYS_MENU_FILE | |
1116 version_msg(_(" system menu file: \"")); | |
1117 version_msg(SYS_MENU_FILE); | |
1118 version_msg("\"\n"); | |
1119 # endif | |
1120 #endif | |
1121 #ifdef HAVE_PATHDEF | |
1122 if (*default_vim_dir != NUL) | |
1123 { | |
1124 version_msg(_(" fall-back for $VIM: \"")); | |
1125 version_msg((char *)default_vim_dir); | |
1126 version_msg("\"\n"); | |
1127 } | |
1128 if (*default_vimruntime_dir != NUL) | |
1129 { | |
1130 version_msg(_(" f-b for $VIMRUNTIME: \"")); | |
1131 version_msg((char *)default_vimruntime_dir); | |
1132 version_msg("\"\n"); | |
1133 } | |
1134 version_msg(_("Compilation: ")); | |
1135 version_msg((char *)all_cflags); | |
1136 version_msg("\n"); | |
1137 #ifdef VMS | |
1138 if (*compiler_version != NUL) | |
1139 { | |
1140 version_msg(_("Compiler: ")); | |
1141 version_msg((char *)compiler_version); | |
1142 version_msg("\n"); | |
1143 } | |
1144 #endif | |
1145 version_msg(_("Linking: ")); | |
1146 version_msg((char *)all_lflags); | |
1147 #endif | |
1148 #ifdef DEBUG | |
1149 version_msg("\n"); | |
1150 version_msg(_(" DEBUG BUILD")); | |
1151 #endif | |
1152 } | |
1153 | |
1154 /* | |
1155 * Output a string for the version message. If it's going to wrap, output a | |
1156 * newline, unless the message is too long to fit on the screen anyway. | |
1157 */ | |
1158 static void | |
1159 version_msg(s) | |
1160 char *s; | |
1161 { | |
1162 int len = (int)STRLEN(s); | |
1163 | |
1164 if (!got_int && len < (int)Columns && msg_col + len >= (int)Columns | |
1165 && *s != '\n') | |
1166 msg_putchar('\n'); | |
1167 if (!got_int) | |
1168 MSG_PUTS(s); | |
1169 } | |
1170 | |
1171 static void do_intro_line __ARGS((int row, char_u *mesg, int add_version, int attr)); | |
1172 | |
1173 /* | |
5126
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1174 * Show the intro message when not editing a file. |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1175 */ |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1176 void |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1177 maybe_intro_message() |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1178 { |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1179 if (bufempty() |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1180 && curbuf->b_fname == NULL |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1181 #ifdef FEAT_WINDOWS |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1182 && firstwin->w_next == NULL |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1183 #endif |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1184 && vim_strchr(p_shm, SHM_INTRO) == NULL) |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1185 intro_message(FALSE); |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1186 } |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1187 |
71859e71b1f9
updated for version 7.3.1306
Bram Moolenaar <bram@vim.org>
parents:
5124
diff
changeset
|
1188 /* |
7 | 1189 * Give an introductory message about Vim. |
1190 * Only used when starting Vim on an empty file, without a file name. | |
1191 * Or with the ":intro" command (for Sven :-). | |
1192 */ | |
1193 void | |
1194 intro_message(colon) | |
1195 int colon; /* TRUE for ":intro" */ | |
1196 { | |
1197 int i; | |
1198 int row; | |
1199 int blanklines; | |
1200 int sponsor; | |
1201 char *p; | |
1202 static char *(lines[]) = | |
1203 { | |
1204 N_("VIM - Vi IMproved"), | |
1205 "", | |
1206 N_("version "), | |
1207 N_("by Bram Moolenaar et al."), | |
1208 #ifdef MODIFIED_BY | |
1209 " ", | |
1210 #endif | |
1211 N_("Vim is open source and freely distributable"), | |
1212 "", | |
1213 N_("Help poor children in Uganda!"), | |
1214 N_("type :help iccf<Enter> for information "), | |
1215 "", | |
1216 N_("type :q<Enter> to exit "), | |
1217 N_("type :help<Enter> or <F1> for on-line help"), | |
26 | 1218 N_("type :help version7<Enter> for version info"), |
7 | 1219 NULL, |
1220 "", | |
1221 N_("Running in Vi compatible mode"), | |
1222 N_("type :set nocp<Enter> for Vim defaults"), | |
1223 N_("type :help cp-default<Enter> for info on this"), | |
1224 }; | |
1225 #ifdef FEAT_GUI | |
1226 static char *(gui_lines[]) = | |
1227 { | |
1228 NULL, | |
1229 NULL, | |
1230 NULL, | |
1231 NULL, | |
1232 #ifdef MODIFIED_BY | |
1233 NULL, | |
1234 #endif | |
1235 NULL, | |
1236 NULL, | |
1237 NULL, | |
1238 N_("menu Help->Orphans for information "), | |
1239 NULL, | |
1240 N_("Running modeless, typed text is inserted"), | |
1241 N_("menu Edit->Global Settings->Toggle Insert Mode "), | |
1242 N_(" for two modes "), | |
1243 NULL, | |
1244 NULL, | |
1245 NULL, | |
1246 N_("menu Edit->Global Settings->Toggle Vi Compatible"), | |
1247 N_(" for Vim defaults "), | |
1248 }; | |
1249 #endif | |
1250 | |
1251 /* blanklines = screen height - # message lines */ | |
1252 blanklines = (int)Rows - ((sizeof(lines) / sizeof(char *)) - 1); | |
1253 if (!p_cp) | |
1254 blanklines += 4; /* add 4 for not showing "Vi compatible" message */ | |
1255 #if defined(WIN3264) && !defined(FEAT_GUI_W32) | |
1256 if (mch_windows95()) | |
1257 blanklines -= 3; /* subtract 3 for showing "Windows 95" message */ | |
1258 #endif | |
1259 | |
1260 #ifdef FEAT_WINDOWS | |
1261 /* Don't overwrite a statusline. Depends on 'cmdheight'. */ | |
1262 if (p_ls > 1) | |
1263 blanklines -= Rows - topframe->fr_height; | |
1264 #endif | |
1265 if (blanklines < 0) | |
1266 blanklines = 0; | |
1267 | |
1268 /* Show the sponsor and register message one out of four times, the Uganda | |
1269 * message two out of four times. */ | |
615 | 1270 sponsor = (int)time(NULL); |
7 | 1271 sponsor = ((sponsor & 2) == 0) - ((sponsor & 4) == 0); |
1272 | |
1273 /* start displaying the message lines after half of the blank lines */ | |
1274 row = blanklines / 2; | |
1275 if ((row >= 2 && Columns >= 50) || colon) | |
1276 { | |
1277 for (i = 0; i < (int)(sizeof(lines) / sizeof(char *)); ++i) | |
1278 { | |
1279 p = lines[i]; | |
1280 #ifdef FEAT_GUI | |
1281 if (p_im && gui.in_use && gui_lines[i] != NULL) | |
1282 p = gui_lines[i]; | |
1283 #endif | |
1284 if (p == NULL) | |
1285 { | |
1286 if (!p_cp) | |
1287 break; | |
1288 continue; | |
1289 } | |
1290 if (sponsor != 0) | |
1291 { | |
1292 if (strstr(p, "children") != NULL) | |
1293 p = sponsor < 0 | |
1294 ? N_("Sponsor Vim development!") | |
1295 : N_("Become a registered Vim user!"); | |
1296 else if (strstr(p, "iccf") != NULL) | |
1297 p = sponsor < 0 | |
1298 ? N_("type :help sponsor<Enter> for information ") | |
1299 : N_("type :help register<Enter> for information "); | |
1300 else if (strstr(p, "Orphans") != NULL) | |
1301 p = N_("menu Help->Sponsor/Register for information "); | |
1302 } | |
1303 if (*p != NUL) | |
1304 do_intro_line(row, (char_u *)_(p), i == 2, 0); | |
1305 ++row; | |
1306 } | |
1307 #if defined(WIN3264) && !defined(FEAT_GUI_W32) | |
1308 if (mch_windows95()) | |
1309 { | |
1310 do_intro_line(++row, | |
1311 (char_u *)_("WARNING: Windows 95/98/ME detected"), | |
1312 FALSE, hl_attr(HLF_E)); | |
1313 do_intro_line(++row, | |
1314 (char_u *)_("type :help windows95<Enter> for info on this"), | |
1315 FALSE, 0); | |
1316 } | |
1317 #endif | |
1318 } | |
1319 | |
1320 /* Make the wait-return message appear just below the text. */ | |
1321 if (colon) | |
1322 msg_row = row; | |
1323 } | |
1324 | |
1325 static void | |
1326 do_intro_line(row, mesg, add_version, attr) | |
1327 int row; | |
1328 char_u *mesg; | |
1329 int add_version; | |
1330 int attr; | |
1331 { | |
1332 char_u vers[20]; | |
1333 int col; | |
1334 char_u *p; | |
1335 int l; | |
1336 int clen; | |
1337 #ifdef MODIFIED_BY | |
1338 # define MODBY_LEN 150 | |
1339 char_u modby[MODBY_LEN]; | |
1340 | |
1341 if (*mesg == ' ') | |
1342 { | |
1491 | 1343 vim_strncpy(modby, (char_u *)_("Modified by "), MODBY_LEN - 1); |
7 | 1344 l = STRLEN(modby); |
1491 | 1345 vim_strncpy(modby + l, (char_u *)MODIFIED_BY, MODBY_LEN - l - 1); |
7 | 1346 mesg = modby; |
1347 } | |
1348 #endif | |
1349 | |
1350 /* Center the message horizontally. */ | |
1351 col = vim_strsize(mesg); | |
1352 if (add_version) | |
1353 { | |
1354 STRCPY(vers, mediumVersion); | |
1355 if (highest_patch()) | |
1356 { | |
1357 /* Check for 9.9x or 9.9xx, alpha/beta version */ | |
2619 | 1358 if (isalpha((int)vers[3])) |
7 | 1359 { |
3396 | 1360 int len = (isalpha((int)vers[4])) ? 5 : 4; |
1361 sprintf((char *)vers + len, ".%d%s", highest_patch(), | |
1362 mediumVersion + len); | |
7 | 1363 } |
1364 else | |
1365 sprintf((char *)vers + 3, ".%d", highest_patch()); | |
1366 } | |
1367 col += (int)STRLEN(vers); | |
1368 } | |
1369 col = (Columns - col) / 2; | |
1370 if (col < 0) | |
1371 col = 0; | |
1372 | |
1373 /* Split up in parts to highlight <> items differently. */ | |
1374 for (p = mesg; *p != NUL; p += l) | |
1375 { | |
1376 clen = 0; | |
1377 for (l = 0; p[l] != NUL | |
1378 && (l == 0 || (p[l] != '<' && p[l - 1] != '>')); ++l) | |
1379 { | |
1380 #ifdef FEAT_MBYTE | |
1381 if (has_mbyte) | |
1382 { | |
1383 clen += ptr2cells(p + l); | |
474 | 1384 l += (*mb_ptr2len)(p + l) - 1; |
7 | 1385 } |
1386 else | |
1387 #endif | |
1388 clen += byte2cells(p[l]); | |
1389 } | |
1390 screen_puts_len(p, l, row, col, *p == '<' ? hl_attr(HLF_8) : attr); | |
1391 col += clen; | |
1392 } | |
1393 | |
1394 /* Add the version number to the version line. */ | |
1395 if (add_version) | |
1396 screen_puts(vers, row, col, 0); | |
1397 } | |
1398 | |
1399 /* | |
1400 * ":intro": clear screen, display intro screen and wait for return. | |
1401 */ | |
1402 void | |
1403 ex_intro(eap) | |
1876 | 1404 exarg_T *eap UNUSED; |
7 | 1405 { |
1406 screenclear(); | |
1407 intro_message(TRUE); | |
1408 wait_return(TRUE); | |
1409 } |