blob: ad8f6b8b01486dd03d43959d076ba4ecb22ad90e [file] [log] [blame]
Bram Moolenaar071d4272004-06-13 20:20:40 +00001/* 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 *
Bram Moolenaar3fdfa4a2004-10-07 21:02:47 +000020 * Differences between version 6.x and 7.x can be found with ":help version7".
Bram Moolenaar071d4272004-06-13 20:20:40 +000021 * 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
Bram Moolenaard042c562005-06-30 22:04:15 +000030char *Version = VIM_VERSION_SHORT;
31static char *mediumVersion = VIM_VERSION_MEDIUM;
Bram Moolenaar071d4272004-06-13 20:20:40 +000032
33#if defined(HAVE_DATE_TIME) || defined(PROTO)
34# if (defined(VMS) && defined(VAXC)) || defined(PROTO)
35char longVersion[sizeof(VIM_VERSION_LONG_DATE) + sizeof(__DATE__)
36 + sizeof(__TIME__) + 3];
37 void
38make_version()
39{
40 /*
41 * Construct the long version string. Necessary because
42 * VAX C can't catenate strings in the preprocessor.
43 */
44 strcpy(longVersion, VIM_VERSION_LONG_DATE);
45 strcat(longVersion, __DATE__);
46 strcat(longVersion, " ");
47 strcat(longVersion, __TIME__);
48 strcat(longVersion, ")");
49}
50# else
51char *longVersion = VIM_VERSION_LONG_DATE __DATE__ " " __TIME__ ")";
52# endif
53#else
54char *longVersion = VIM_VERSION_LONG;
55#endif
56
57static void version_msg __ARGS((char *s));
58
59static char *(features[]) =
60{
61#ifdef AMIGA /* only for Amiga systems */
62# ifdef FEAT_ARP
63 "+ARP",
64# else
65 "-ARP",
66# endif
67#endif
68#ifdef FEAT_ARABIC
69 "+arabic",
70#else
71 "-arabic",
72#endif
73#ifdef FEAT_AUTOCMD
74 "+autocmd",
75#else
76 "-autocmd",
77#endif
78#ifdef FEAT_BEVAL
79 "+balloon_eval",
80#else
81 "-balloon_eval",
82#endif
83#ifdef FEAT_BROWSE
84 "+browse",
85#else
86 "-browse",
87#endif
88#ifdef NO_BUILTIN_TCAPS
89 "-builtin_terms",
90#endif
91#ifdef SOME_BUILTIN_TCAPS
92 "+builtin_terms",
93#endif
94#ifdef ALL_BUILTIN_TCAPS
95 "++builtin_terms",
96#endif
97#ifdef FEAT_BYTEOFF
98 "+byte_offset",
99#else
100 "-byte_offset",
101#endif
102#ifdef FEAT_CINDENT
103 "+cindent",
104#else
105 "-cindent",
106#endif
107#ifdef FEAT_CLIENTSERVER
108 "+clientserver",
109#else
110 "-clientserver",
111#endif
112#ifdef FEAT_CLIPBOARD
113 "+clipboard",
114#else
115 "-clipboard",
116#endif
117#ifdef FEAT_CMDL_COMPL
118 "+cmdline_compl",
119#else
120 "-cmdline_compl",
121#endif
122#ifdef FEAT_CMDHIST
123 "+cmdline_hist",
124#else
125 "-cmdline_hist",
126#endif
127#ifdef FEAT_CMDL_INFO
128 "+cmdline_info",
129#else
130 "-cmdline_info",
131#endif
132#ifdef FEAT_COMMENTS
133 "+comments",
134#else
135 "-comments",
136#endif
137#ifdef FEAT_CRYPT
138 "+cryptv",
139#else
140 "-cryptv",
141#endif
142#ifdef FEAT_CSCOPE
143 "+cscope",
144#else
145 "-cscope",
146#endif
Bram Moolenaar17c7c012006-01-26 22:25:15 +0000147#ifdef CURSOR_SHAPE
148 "+cursorshape",
149#else
150 "-cursorshape",
151#endif
Bram Moolenaar071d4272004-06-13 20:20:40 +0000152#if defined(FEAT_CON_DIALOG) && defined(FEAT_GUI_DIALOG)
153 "+dialog_con_gui",
154#else
155# if defined(FEAT_CON_DIALOG)
156 "+dialog_con",
157# else
158# if defined(FEAT_GUI_DIALOG)
159 "+dialog_gui",
160# else
161 "-dialog",
162# endif
163# endif
164#endif
165#ifdef FEAT_DIFF
166 "+diff",
167#else
168 "-diff",
169#endif
170#ifdef FEAT_DIGRAPHS
171 "+digraphs",
172#else
173 "-digraphs",
174#endif
175#ifdef FEAT_DND
176 "+dnd",
177#else
178 "-dnd",
179#endif
180#ifdef EBCDIC
181 "+ebcdic",
182#else
183 "-ebcdic",
184#endif
185#ifdef FEAT_EMACS_TAGS
186 "+emacs_tags",
187#else
188 "-emacs_tags",
189#endif
190#ifdef FEAT_EVAL
191 "+eval",
192#else
193 "-eval",
194#endif
195#ifdef FEAT_EX_EXTRA
196 "+ex_extra",
197#else
198 "-ex_extra",
199#endif
200#ifdef FEAT_SEARCH_EXTRA
201 "+extra_search",
202#else
203 "-extra_search",
204#endif
205#ifdef FEAT_FKMAP
206 "+farsi",
207#else
208 "-farsi",
209#endif
210#ifdef FEAT_SEARCHPATH
211 "+file_in_path",
212#else
213 "-file_in_path",
214#endif
215#ifdef FEAT_FIND_ID
216 "+find_in_path",
217#else
218 "-find_in_path",
219#endif
220#ifdef FEAT_FOLDING
221 "+folding",
222#else
223 "-folding",
224#endif
225#ifdef FEAT_FOOTER
226 "+footer",
227#else
228 "-footer",
229#endif
230 /* only interesting on Unix systems */
231#if !defined(USE_SYSTEM) && defined(UNIX)
232 "+fork()",
233#endif
234#ifdef FEAT_GETTEXT
235# ifdef DYNAMIC_GETTEXT
236 "+gettext/dyn",
237# else
238 "+gettext",
239# endif
240#else
241 "-gettext",
242#endif
243#ifdef FEAT_HANGULIN
244 "+hangul_input",
245#else
246 "-hangul_input",
247#endif
248#if (defined(HAVE_ICONV_H) && defined(USE_ICONV)) || defined(DYNAMIC_ICONV)
249# ifdef DYNAMIC_ICONV
250 "+iconv/dyn",
251# else
252 "+iconv",
253# endif
254#else
255 "-iconv",
256#endif
257#ifdef FEAT_INS_EXPAND
258 "+insert_expand",
259#else
260 "-insert_expand",
261#endif
262#ifdef FEAT_JUMPLIST
263 "+jumplist",
264#else
265 "-jumplist",
266#endif
267#ifdef FEAT_KEYMAP
268 "+keymap",
269#else
270 "-keymap",
271#endif
272#ifdef FEAT_LANGMAP
273 "+langmap",
274#else
275 "-langmap",
276#endif
277#ifdef FEAT_LIBCALL
278 "+libcall",
279#else
280 "-libcall",
281#endif
282#ifdef FEAT_LINEBREAK
283 "+linebreak",
284#else
285 "-linebreak",
286#endif
287#ifdef FEAT_LISP
288 "+lispindent",
289#else
290 "-lispindent",
291#endif
292#ifdef FEAT_LISTCMDS
293 "+listcmds",
294#else
295 "-listcmds",
296#endif
297#ifdef FEAT_LOCALMAP
298 "+localmap",
299#else
300 "-localmap",
301#endif
302#ifdef FEAT_MENU
303 "+menu",
304#else
305 "-menu",
306#endif
307#ifdef FEAT_SESSION
308 "+mksession",
309#else
310 "-mksession",
311#endif
312#ifdef FEAT_MODIFY_FNAME
313 "+modify_fname",
314#else
315 "-modify_fname",
316#endif
317#ifdef FEAT_MOUSE
318 "+mouse",
319# ifdef FEAT_MOUSESHAPE
320 "+mouseshape",
321# else
322 "-mouseshape",
323# endif
324# else
325 "-mouse",
326#endif
327#if defined(UNIX) || defined(VMS)
328# ifdef FEAT_MOUSE_DEC
329 "+mouse_dec",
330# else
331 "-mouse_dec",
332# endif
333# ifdef FEAT_MOUSE_GPM
334 "+mouse_gpm",
335# else
336 "-mouse_gpm",
337# endif
338# ifdef FEAT_MOUSE_JSB
339 "+mouse_jsbterm",
340# else
341 "-mouse_jsbterm",
342# endif
343# ifdef FEAT_MOUSE_NET
344 "+mouse_netterm",
345# else
346 "-mouse_netterm",
347# endif
348# ifdef FEAT_MOUSE_XTERM
349 "+mouse_xterm",
350# else
351 "-mouse_xterm",
352# endif
353#endif
354#ifdef __QNX__
355# ifdef FEAT_MOUSE_PTERM
356 "+mouse_pterm",
357# else
358 "-mouse_pterm",
359# endif
360#endif
361#ifdef FEAT_MBYTE_IME
362# ifdef DYNAMIC_IME
363 "+multi_byte_ime/dyn",
364# else
365 "+multi_byte_ime",
366# endif
367#else
368# ifdef FEAT_MBYTE
369 "+multi_byte",
370# else
371 "-multi_byte",
372# endif
373#endif
374#ifdef FEAT_MULTI_LANG
375 "+multi_lang",
376#else
377 "-multi_lang",
378#endif
Bram Moolenaar325b7a22004-07-05 15:58:32 +0000379#ifdef FEAT_MZSCHEME
Bram Moolenaardf3267e2005-01-25 22:07:05 +0000380# ifdef DYNAMIC_MZSCHEME
381 "+mzscheme/dyn",
382# else
Bram Moolenaar325b7a22004-07-05 15:58:32 +0000383 "+mzscheme",
Bram Moolenaardf3267e2005-01-25 22:07:05 +0000384# endif
Bram Moolenaar325b7a22004-07-05 15:58:32 +0000385#else
386 "-mzscheme",
387#endif
Bram Moolenaar071d4272004-06-13 20:20:40 +0000388#ifdef FEAT_NETBEANS_INTG
389 "+netbeans_intg",
390#else
391 "-netbeans_intg",
392#endif
393#ifdef FEAT_GUI_W32
394# ifdef FEAT_OLE
395 "+ole",
396# else
397 "-ole",
398# endif
399#endif
400#ifdef FEAT_OSFILETYPE
401 "+osfiletype",
402#else
403 "-osfiletype",
404#endif
405#ifdef FEAT_PATH_EXTRA
406 "+path_extra",
407#else
408 "-path_extra",
409#endif
410#ifdef FEAT_PERL
411# ifdef DYNAMIC_PERL
412 "+perl/dyn",
413# else
414 "+perl",
415# endif
416#else
417 "-perl",
418#endif
419#ifdef FEAT_PRINTER
420# ifdef FEAT_POSTSCRIPT
421 "+postscript",
422# else
423 "-postscript",
424# endif
425 "+printer",
426#else
427 "-printer",
428#endif
Bram Moolenaar05159a02005-02-26 23:04:13 +0000429#ifdef FEAT_PROFILE
430 "+profile",
431#else
432 "-profile",
433#endif
Bram Moolenaar071d4272004-06-13 20:20:40 +0000434#ifdef FEAT_PYTHON
435# ifdef DYNAMIC_PYTHON
436 "+python/dyn",
437# else
438 "+python",
439# endif
440#else
441 "-python",
442#endif
443#ifdef FEAT_QUICKFIX
444 "+quickfix",
445#else
446 "-quickfix",
447#endif
Bram Moolenaard68071d2006-05-02 22:08:30 +0000448#ifdef FEAT_RELTIME
449 "+reltime",
450#else
451 "-reltime",
452#endif
Bram Moolenaar071d4272004-06-13 20:20:40 +0000453#ifdef FEAT_RIGHTLEFT
454 "+rightleft",
455#else
456 "-rightleft",
457#endif
458#ifdef FEAT_RUBY
459# ifdef DYNAMIC_RUBY
460 "+ruby/dyn",
461# else
462 "+ruby",
463# endif
464#else
465 "-ruby",
466#endif
467#ifdef FEAT_SCROLLBIND
468 "+scrollbind",
469#else
470 "-scrollbind",
471#endif
472#ifdef FEAT_SIGNS
473 "+signs",
474#else
475 "-signs",
476#endif
477#ifdef FEAT_SMARTINDENT
478 "+smartindent",
479#else
480 "-smartindent",
481#endif
482#ifdef FEAT_SNIFF
483 "+sniff",
484#else
485 "-sniff",
486#endif
487#ifdef FEAT_STL_OPT
488 "+statusline",
489#else
490 "-statusline",
491#endif
492#ifdef FEAT_SUN_WORKSHOP
493 "+sun_workshop",
494#else
495 "-sun_workshop",
496#endif
497#ifdef FEAT_SYN_HL
498 "+syntax",
499#else
500 "-syntax",
501#endif
502 /* only interesting on Unix systems */
503#if defined(USE_SYSTEM) && (defined(UNIX) || defined(__EMX__))
504 "+system()",
505#endif
506#ifdef FEAT_TAG_BINS
507 "+tag_binary",
508#else
509 "-tag_binary",
510#endif
511#ifdef FEAT_TAG_OLDSTATIC
512 "+tag_old_static",
513#else
514 "-tag_old_static",
515#endif
516#ifdef FEAT_TAG_ANYWHITE
517 "+tag_any_white",
518#else
519 "-tag_any_white",
520#endif
521#ifdef FEAT_TCL
522# ifdef DYNAMIC_TCL
523 "+tcl/dyn",
524# else
525 "+tcl",
526# endif
527#else
528 "-tcl",
529#endif
530#if defined(UNIX) || defined(__EMX__)
531/* only Unix (or OS/2 with EMX!) can have terminfo instead of termcap */
532# ifdef TERMINFO
533 "+terminfo",
534# else
535 "-terminfo",
536# endif
537#else /* unix always includes termcap support */
538# ifdef HAVE_TGETENT
539 "+tgetent",
540# else
541 "-tgetent",
542# endif
543#endif
544#ifdef FEAT_TERMRESPONSE
545 "+termresponse",
546#else
547 "-termresponse",
548#endif
549#ifdef FEAT_TEXTOBJ
550 "+textobjects",
551#else
552 "-textobjects",
553#endif
554#ifdef FEAT_TITLE
555 "+title",
556#else
557 "-title",
558#endif
559#ifdef FEAT_TOOLBAR
560 "+toolbar",
561#else
562 "-toolbar",
563#endif
564#ifdef FEAT_USR_CMDS
565 "+user_commands",
566#else
567 "-user_commands",
568#endif
569#ifdef FEAT_VERTSPLIT
570 "+vertsplit",
571#else
572 "-vertsplit",
573#endif
574#ifdef FEAT_VIRTUALEDIT
575 "+virtualedit",
576#else
577 "-virtualedit",
578#endif
579#ifdef FEAT_VISUAL
580 "+visual",
581# ifdef FEAT_VISUALEXTRA
582 "+visualextra",
583# else
584 "-visualextra",
585# endif
586#else
587 "-visual",
588#endif
589#ifdef FEAT_VIMINFO
590 "+viminfo",
591#else
592 "-viminfo",
593#endif
594#ifdef FEAT_VREPLACE
595 "+vreplace",
596#else
597 "-vreplace",
598#endif
599#ifdef FEAT_WILDIGN
600 "+wildignore",
601#else
602 "-wildignore",
603#endif
604#ifdef FEAT_WILDMENU
605 "+wildmenu",
606#else
607 "-wildmenu",
608#endif
609#ifdef FEAT_WINDOWS
610 "+windows",
611#else
612 "-windows",
613#endif
614#ifdef FEAT_WRITEBACKUP
615 "+writebackup",
616#else
617 "-writebackup",
618#endif
619#if defined(UNIX) || defined(VMS)
620# ifdef FEAT_X11
621 "+X11",
622# else
623 "-X11",
624# endif
625#endif
626#ifdef FEAT_XFONTSET
627 "+xfontset",
628#else
629 "-xfontset",
630#endif
631#ifdef FEAT_XIM
632 "+xim",
633#else
634 "-xim",
635#endif
636#if defined(UNIX) || defined(VMS)
637# ifdef USE_XSMP_INTERACT
638 "+xsmp_interact",
639# else
640# ifdef USE_XSMP
641 "+xsmp",
642# else
643 "-xsmp",
644# endif
645# endif
646# ifdef FEAT_XCLIPBOARD
647 "+xterm_clipboard",
648# else
649 "-xterm_clipboard",
650# endif
651#endif
652#ifdef FEAT_XTERM_SAVE
653 "+xterm_save",
654#else
655 "-xterm_save",
656#endif
657#ifdef WIN3264
658# ifdef FEAT_XPM_W32
659 "+xpm_w32",
660# else
661 "-xpm_w32",
662# endif
663#endif
664 NULL
665};
666
667static int included_patches[] =
668{ /* Add new patch number below this line */
669/**/
Bram Moolenaar349955a2007-08-14 21:07:36 +0000670 77,
671/**/
Bram Moolenaarb0db5692007-08-14 20:54:49 +0000672 76,
673/**/
Bram Moolenaar31859182007-08-14 20:41:13 +0000674 75,
675/**/
Bram Moolenaar92c5aba2007-08-14 20:29:31 +0000676 74,
677/**/
Bram Moolenaar4d64b782007-08-14 20:16:42 +0000678 73,
679/**/
Bram Moolenaar9c039782007-08-14 15:55:42 +0000680 72,
681/**/
Bram Moolenaar4d2fffc2007-08-14 15:29:16 +0000682 71,
683/**/
Bram Moolenaar2b80e652007-08-14 14:57:55 +0000684 70,
685/**/
Bram Moolenaard2c765e2007-08-14 13:00:40 +0000686 69,
687/**/
Bram Moolenaar67f71312007-08-12 14:55:56 +0000688 68,
689/**/
Bram Moolenaara2993e12007-08-12 14:38:46 +0000690 67,
691/**/
Bram Moolenaar83eb8852007-08-12 13:51:26 +0000692 66,
693/**/
Bram Moolenaar8c69d532007-08-12 13:25:01 +0000694 65,
695/**/
Bram Moolenaar708f62c2007-08-11 20:24:10 +0000696 64,
697/**/
Bram Moolenaar52d36c82007-08-11 14:00:30 +0000698 63,
699/**/
Bram Moolenaarcc00b952007-08-11 12:32:57 +0000700 62,
701/**/
Bram Moolenaara245a5b2007-08-11 11:58:23 +0000702 61,
703/**/
Bram Moolenaar48cc5fe2007-08-11 11:39:45 +0000704 60,
705/**/
Bram Moolenaar225d32b2007-08-10 19:33:47 +0000706 59,
707/**/
Bram Moolenaarabc97732007-08-08 20:49:37 +0000708 58,
709/**/
Bram Moolenaarc2f5abc2007-08-08 19:42:05 +0000710 57,
711/**/
Bram Moolenaar1b0b07f2007-08-07 20:00:31 +0000712 56,
713/**/
Bram Moolenaar452a81b2007-08-06 20:28:43 +0000714 55,
715/**/
Bram Moolenaara064ac82007-08-05 18:10:54 +0000716 54,
717/**/
Bram Moolenaar57b7fe82007-08-05 17:20:43 +0000718 53,
719/**/
Bram Moolenaar0963cd92007-08-05 16:49:43 +0000720 52,
721/**/
Bram Moolenaar3dcfbf72007-08-05 16:33:12 +0000722 51,
723/**/
Bram Moolenaare7c56862007-08-04 10:14:52 +0000724 50,
725/**/
Bram Moolenaar179af2c2007-08-03 20:02:28 +0000726 49,
727/**/
Bram Moolenaaref045862007-08-02 21:00:50 +0000728 48,
729/**/
Bram Moolenaar150cc272007-08-01 13:47:46 +0000730 47,
731/**/
Bram Moolenaar9225efb2007-07-30 20:32:53 +0000732 46,
733/**/
Bram Moolenaar943fae42007-07-30 20:00:38 +0000734 45,
735/**/
Bram Moolenaar0cbac5b2007-07-29 13:03:35 +0000736 44,
737/**/
Bram Moolenaar76624232007-07-28 12:21:47 +0000738 43,
739/**/
Bram Moolenaar2240aeb2007-07-27 19:33:14 +0000740 42,
741/**/
Bram Moolenaarbf96fb42007-07-26 21:11:52 +0000742 41,
743/**/
Bram Moolenaar6ee10162007-07-26 20:58:42 +0000744 40,
745/**/
Bram Moolenaarf6210482007-07-25 20:56:39 +0000746 39,
747/**/
Bram Moolenaar5002c292007-07-24 13:26:15 +0000748 38,
749/**/
Bram Moolenaar3afaae42007-07-24 12:58:01 +0000750 37,
751/**/
Bram Moolenaar4f688582007-07-24 12:34:30 +0000752 36,
753/**/
Bram Moolenaarfe40d1a2007-07-24 09:16:38 +0000754 35,
755/**/
Bram Moolenaar5fdec472007-07-24 08:45:13 +0000756 34,
757/**/
Bram Moolenaar9cffde92007-07-24 07:51:18 +0000758 33,
759/**/
Bram Moolenaar5f2c5db2007-07-17 16:15:36 +0000760 32,
761/**/
Bram Moolenaar477933c2007-07-17 14:32:23 +0000762 31,
763/**/
Bram Moolenaar13153492007-07-17 12:33:46 +0000764 30,
765/**/
Bram Moolenaar7bb75552007-07-16 18:39:49 +0000766 29,
767/**/
Bram Moolenaar1256e722007-07-10 15:26:20 +0000768 28,
769/**/
Bram Moolenaarfe1c56d2007-07-10 15:10:54 +0000770 27,
771/**/
Bram Moolenaar78f6f7e2007-07-10 12:03:33 +0000772 26,
773/**/
Bram Moolenaar7a42fa32007-07-10 11:28:55 +0000774 25,
775/**/
Bram Moolenaaraec11792007-07-10 11:09:36 +0000776 24,
777/**/
Bram Moolenaar9a149792007-07-10 10:38:02 +0000778 23,
779/**/
Bram Moolenaarbf444172007-07-07 11:58:28 +0000780 22,
781/**/
Bram Moolenaare2a49d82007-07-06 17:43:08 +0000782 21,
783/**/
Bram Moolenaar6a516062007-07-05 08:11:42 +0000784 20,
785/**/
Bram Moolenaar3ebc1e52007-07-05 07:54:17 +0000786 19,
787/**/
Bram Moolenaare649ef02007-06-28 20:18:51 +0000788 18,
789/**/
Bram Moolenaar5386a122007-06-28 20:02:32 +0000790 17,
791/**/
Bram Moolenaar7f514742007-06-28 19:33:43 +0000792 16,
793/**/
Bram Moolenaarf15f9432007-06-28 11:07:21 +0000794 15,
795/**/
Bram Moolenaar30118152007-06-28 10:49:22 +0000796 14,
797/**/
Bram Moolenaar786b1dc2007-06-28 10:03:45 +0000798 13,
799/**/
Bram Moolenaar96bb6212007-06-19 18:52:53 +0000800 12,
801/**/
Bram Moolenaar1ad2f132007-06-19 18:27:18 +0000802 11,
803/**/
Bram Moolenaardc3213d2007-06-19 16:03:50 +0000804 10,
805/**/
Bram Moolenaar4b80a512007-06-19 15:44:58 +0000806 9,
807/**/
Bram Moolenaar884aa892007-06-19 15:31:05 +0000808 8,
809/**/
Bram Moolenaare02d7b22007-06-19 14:29:43 +0000810 7,
811/**/
Bram Moolenaar512e6b82007-06-19 13:36:52 +0000812 6,
813/**/
Bram Moolenaar1864a4e2007-06-19 10:56:05 +0000814 5,
815/**/
Bram Moolenaarb1269f12007-06-19 09:51:25 +0000816 4,
817/**/
Bram Moolenaar2d8ab992007-06-19 08:06:18 +0000818 3,
819/**/
Bram Moolenaar10425272007-05-15 07:12:25 +0000820 2,
821/**/
Bram Moolenaara2dd9002007-05-14 17:38:30 +0000822 1,
823/**/
Bram Moolenaar071d4272004-06-13 20:20:40 +0000824 0
825};
826
827 int
828highest_patch()
829{
830 int i;
831 int h = 0;
832
833 for (i = 0; included_patches[i] != 0; ++i)
834 if (included_patches[i] > h)
835 h = included_patches[i];
836 return h;
837}
838
839#if defined(FEAT_EVAL) || defined(PROTO)
840/*
841 * Return TRUE if patch "n" has been included.
842 */
843 int
844has_patch(n)
845 int n;
846{
847 int i;
848
849 for (i = 0; included_patches[i] != 0; ++i)
850 if (included_patches[i] == n)
851 return TRUE;
852 return FALSE;
853}
854#endif
855
856 void
857ex_version(eap)
858 exarg_T *eap;
859{
860 /*
861 * Ignore a ":version 9.99" command.
862 */
863 if (*eap->arg == NUL)
864 {
865 msg_putchar('\n');
866 list_version();
867 }
868}
869
870 void
871list_version()
872{
873 int i;
874 int first;
875 char *s = "";
876
877 /*
878 * When adding features here, don't forget to update the list of
879 * internal variables in eval.c!
880 */
881 MSG(longVersion);
882#ifdef WIN3264
883# ifdef FEAT_GUI_W32
884# if defined(_MSC_VER) && (_MSC_VER <= 1010)
885 /* Only MS VC 4.1 and earlier can do Win32s */
886 MSG_PUTS(_("\nMS-Windows 16/32 bit GUI version"));
887# else
Bram Moolenaard9b87332006-10-03 14:30:41 +0000888# ifdef _WIN64
889 MSG_PUTS(_("\nMS-Windows 64 bit GUI version"));
890# else
Bram Moolenaar071d4272004-06-13 20:20:40 +0000891 MSG_PUTS(_("\nMS-Windows 32 bit GUI version"));
Bram Moolenaard9b87332006-10-03 14:30:41 +0000892# endif
Bram Moolenaar071d4272004-06-13 20:20:40 +0000893# endif
894 if (gui_is_win32s())
895 MSG_PUTS(_(" in Win32s mode"));
896# ifdef FEAT_OLE
897 MSG_PUTS(_(" with OLE support"));
898# endif
899# else
900 MSG_PUTS(_("\nMS-Windows 32 bit console version"));
901# endif
902#endif
903#ifdef WIN16
904 MSG_PUTS(_("\nMS-Windows 16 bit version"));
905#endif
906#ifdef MSDOS
907# ifdef DJGPP
908 MSG_PUTS(_("\n32 bit MS-DOS version"));
909# else
910 MSG_PUTS(_("\n16 bit MS-DOS version"));
911# endif
912#endif
913#ifdef MACOS
914# ifdef MACOS_X
915# ifdef MACOS_X_UNIX
916 MSG_PUTS(_("\nMacOS X (unix) version"));
917# else
918 MSG_PUTS(_("\nMacOS X version"));
919# endif
920#else
921 MSG_PUTS(_("\nMacOS version"));
922# endif
923#endif
924
925#ifdef RISCOS
926 MSG_PUTS(_("\nRISC OS version"));
927#endif
928#ifdef VMS
929 MSG_PUTS("\nOpenVMS version");
Bram Moolenaar3d20ca12006-11-28 16:43:58 +0000930# ifdef HAVE_PATHDEF
931 if (*compiled_arch != NUL)
932 {
933 MSG_PUTS(" - ");
934 MSG_PUTS(compiled_arch);
935 }
936# endif
937
Bram Moolenaar071d4272004-06-13 20:20:40 +0000938#endif
939
940 /* Print the list of patch numbers if there is at least one. */
941 /* Print a range when patches are consecutive: "1-10, 12, 15-40, 42-45" */
942 if (included_patches[0] != 0)
943 {
944 MSG_PUTS(_("\nIncluded patches: "));
945 first = -1;
946 /* find last one */
947 for (i = 0; included_patches[i] != 0; ++i)
948 ;
949 while (--i >= 0)
950 {
951 if (first < 0)
952 first = included_patches[i];
953 if (i == 0 || included_patches[i - 1] != included_patches[i] + 1)
954 {
955 MSG_PUTS(s);
956 s = ", ";
957 msg_outnum((long)first);
958 if (first != included_patches[i])
959 {
960 MSG_PUTS("-");
961 msg_outnum((long)included_patches[i]);
962 }
963 first = -1;
964 }
965 }
966 }
967
968#ifdef MODIFIED_BY
969 MSG_PUTS("\n");
970 MSG_PUTS(_("Modified by "));
971 MSG_PUTS(MODIFIED_BY);
972#endif
973
974#ifdef HAVE_PATHDEF
975 if (*compiled_user != NUL || *compiled_sys != NUL)
976 {
977 MSG_PUTS(_("\nCompiled "));
978 if (*compiled_user != NUL)
979 {
980 MSG_PUTS(_("by "));
981 MSG_PUTS(compiled_user);
982 }
983 if (*compiled_sys != NUL)
984 {
985 MSG_PUTS("@");
986 MSG_PUTS(compiled_sys);
987 }
988 }
989#endif
990
991#ifdef FEAT_HUGE
992 MSG_PUTS(_("\nHuge version "));
993#else
994# ifdef FEAT_BIG
995 MSG_PUTS(_("\nBig version "));
996# else
997# ifdef FEAT_NORMAL
998 MSG_PUTS(_("\nNormal version "));
999# else
1000# ifdef FEAT_SMALL
1001 MSG_PUTS(_("\nSmall version "));
1002# else
1003 MSG_PUTS(_("\nTiny version "));
1004# endif
1005# endif
1006# endif
1007#endif
1008#ifndef FEAT_GUI
1009 MSG_PUTS(_("without GUI."));
1010#else
1011# ifdef FEAT_GUI_GTK
1012# ifdef FEAT_GUI_GNOME
1013# ifdef HAVE_GTK2
1014 MSG_PUTS(_("with GTK2-GNOME GUI."));
1015# else
1016 MSG_PUTS(_("with GTK-GNOME GUI."));
1017# endif
1018# else
1019# ifdef HAVE_GTK2
1020 MSG_PUTS(_("with GTK2 GUI."));
1021# else
1022 MSG_PUTS(_("with GTK GUI."));
1023# endif
1024# endif
1025# else
1026# ifdef FEAT_GUI_MOTIF
1027 MSG_PUTS(_("with X11-Motif GUI."));
1028# else
1029# ifdef FEAT_GUI_ATHENA
1030# ifdef FEAT_GUI_NEXTAW
1031 MSG_PUTS(_("with X11-neXtaw GUI."));
1032# else
1033 MSG_PUTS(_("with X11-Athena GUI."));
1034# endif
1035# else
Bram Moolenaar071d4272004-06-13 20:20:40 +00001036# ifdef FEAT_GUI_PHOTON
1037 MSG_PUTS(_("with Photon GUI."));
1038# else
1039# if defined(MSWIN)
1040 MSG_PUTS(_("with GUI."));
1041# else
1042# if defined (TARGET_API_MAC_CARBON) && TARGET_API_MAC_CARBON
1043 MSG_PUTS(_("with Carbon GUI."));
1044# else
1045# if defined (TARGET_API_MAC_OSX) && TARGET_API_MAC_OSX
1046 MSG_PUTS(_("with Cocoa GUI."));
1047# else
1048# if defined (MACOS)
1049 MSG_PUTS(_("with (classic) GUI."));
Bram Moolenaar071d4272004-06-13 20:20:40 +00001050# endif
1051# endif
1052# endif
1053# endif
Bram Moolenaar071d4272004-06-13 20:20:40 +00001054# endif
1055# endif
1056# endif
1057# endif
1058#endif
1059 version_msg(_(" Features included (+) or not (-):\n"));
1060
1061 /* print all the features */
1062 for (i = 0; features[i] != NULL; ++i)
1063 {
1064 version_msg(features[i]);
1065 if (msg_col > 0)
1066 version_msg(" ");
1067 }
1068
1069 version_msg("\n");
1070#ifdef SYS_VIMRC_FILE
1071 version_msg(_(" system vimrc file: \""));
1072 version_msg(SYS_VIMRC_FILE);
1073 version_msg("\"\n");
1074#endif
1075#ifdef USR_VIMRC_FILE
1076 version_msg(_(" user vimrc file: \""));
1077 version_msg(USR_VIMRC_FILE);
1078 version_msg("\"\n");
1079#endif
1080#ifdef USR_VIMRC_FILE2
1081 version_msg(_(" 2nd user vimrc file: \""));
1082 version_msg(USR_VIMRC_FILE2);
1083 version_msg("\"\n");
1084#endif
1085#ifdef USR_VIMRC_FILE3
1086 version_msg(_(" 3rd user vimrc file: \""));
1087 version_msg(USR_VIMRC_FILE3);
1088 version_msg("\"\n");
1089#endif
1090#ifdef USR_EXRC_FILE
1091 version_msg(_(" user exrc file: \""));
1092 version_msg(USR_EXRC_FILE);
1093 version_msg("\"\n");
1094#endif
1095#ifdef USR_EXRC_FILE2
1096 version_msg(_(" 2nd user exrc file: \""));
1097 version_msg(USR_EXRC_FILE2);
1098 version_msg("\"\n");
1099#endif
1100#ifdef FEAT_GUI
1101# ifdef SYS_GVIMRC_FILE
1102 version_msg(_(" system gvimrc file: \""));
1103 version_msg(SYS_GVIMRC_FILE);
1104 version_msg("\"\n");
1105# endif
1106 version_msg(_(" user gvimrc file: \""));
1107 version_msg(USR_GVIMRC_FILE);
1108 version_msg("\"\n");
1109# ifdef USR_GVIMRC_FILE2
1110 version_msg(_("2nd user gvimrc file: \""));
1111 version_msg(USR_GVIMRC_FILE2);
1112 version_msg("\"\n");
1113# endif
1114# ifdef USR_GVIMRC_FILE3
1115 version_msg(_("3rd user gvimrc file: \""));
1116 version_msg(USR_GVIMRC_FILE3);
1117 version_msg("\"\n");
1118# endif
1119#endif
1120#ifdef FEAT_GUI
1121# ifdef SYS_MENU_FILE
1122 version_msg(_(" system menu file: \""));
1123 version_msg(SYS_MENU_FILE);
1124 version_msg("\"\n");
1125# endif
1126#endif
1127#ifdef HAVE_PATHDEF
1128 if (*default_vim_dir != NUL)
1129 {
1130 version_msg(_(" fall-back for $VIM: \""));
1131 version_msg((char *)default_vim_dir);
1132 version_msg("\"\n");
1133 }
1134 if (*default_vimruntime_dir != NUL)
1135 {
1136 version_msg(_(" f-b for $VIMRUNTIME: \""));
1137 version_msg((char *)default_vimruntime_dir);
1138 version_msg("\"\n");
1139 }
1140 version_msg(_("Compilation: "));
1141 version_msg((char *)all_cflags);
1142 version_msg("\n");
1143#ifdef VMS
1144 if (*compiler_version != NUL)
1145 {
1146 version_msg(_("Compiler: "));
1147 version_msg((char *)compiler_version);
1148 version_msg("\n");
1149 }
1150#endif
1151 version_msg(_("Linking: "));
1152 version_msg((char *)all_lflags);
1153#endif
1154#ifdef DEBUG
1155 version_msg("\n");
1156 version_msg(_(" DEBUG BUILD"));
1157#endif
1158}
1159
1160/*
1161 * Output a string for the version message. If it's going to wrap, output a
1162 * newline, unless the message is too long to fit on the screen anyway.
1163 */
1164 static void
1165version_msg(s)
1166 char *s;
1167{
1168 int len = (int)STRLEN(s);
1169
1170 if (!got_int && len < (int)Columns && msg_col + len >= (int)Columns
1171 && *s != '\n')
1172 msg_putchar('\n');
1173 if (!got_int)
1174 MSG_PUTS(s);
1175}
1176
1177static void do_intro_line __ARGS((int row, char_u *mesg, int add_version, int attr));
1178
1179/*
1180 * Give an introductory message about Vim.
1181 * Only used when starting Vim on an empty file, without a file name.
1182 * Or with the ":intro" command (for Sven :-).
1183 */
1184 void
1185intro_message(colon)
1186 int colon; /* TRUE for ":intro" */
1187{
1188 int i;
1189 int row;
1190 int blanklines;
1191 int sponsor;
1192 char *p;
1193 static char *(lines[]) =
1194 {
1195 N_("VIM - Vi IMproved"),
1196 "",
1197 N_("version "),
1198 N_("by Bram Moolenaar et al."),
1199#ifdef MODIFIED_BY
1200 " ",
1201#endif
1202 N_("Vim is open source and freely distributable"),
1203 "",
1204 N_("Help poor children in Uganda!"),
1205 N_("type :help iccf<Enter> for information "),
1206 "",
1207 N_("type :q<Enter> to exit "),
1208 N_("type :help<Enter> or <F1> for on-line help"),
Bram Moolenaar3fdfa4a2004-10-07 21:02:47 +00001209 N_("type :help version7<Enter> for version info"),
Bram Moolenaar071d4272004-06-13 20:20:40 +00001210 NULL,
1211 "",
1212 N_("Running in Vi compatible mode"),
1213 N_("type :set nocp<Enter> for Vim defaults"),
1214 N_("type :help cp-default<Enter> for info on this"),
1215 };
1216#ifdef FEAT_GUI
1217 static char *(gui_lines[]) =
1218 {
1219 NULL,
1220 NULL,
1221 NULL,
1222 NULL,
1223#ifdef MODIFIED_BY
1224 NULL,
1225#endif
1226 NULL,
1227 NULL,
1228 NULL,
1229 N_("menu Help->Orphans for information "),
1230 NULL,
1231 N_("Running modeless, typed text is inserted"),
1232 N_("menu Edit->Global Settings->Toggle Insert Mode "),
1233 N_(" for two modes "),
1234 NULL,
1235 NULL,
1236 NULL,
1237 N_("menu Edit->Global Settings->Toggle Vi Compatible"),
1238 N_(" for Vim defaults "),
1239 };
1240#endif
1241
1242 /* blanklines = screen height - # message lines */
1243 blanklines = (int)Rows - ((sizeof(lines) / sizeof(char *)) - 1);
1244 if (!p_cp)
1245 blanklines += 4; /* add 4 for not showing "Vi compatible" message */
1246#if defined(WIN3264) && !defined(FEAT_GUI_W32)
1247 if (mch_windows95())
1248 blanklines -= 3; /* subtract 3 for showing "Windows 95" message */
1249#endif
1250
1251#ifdef FEAT_WINDOWS
1252 /* Don't overwrite a statusline. Depends on 'cmdheight'. */
1253 if (p_ls > 1)
1254 blanklines -= Rows - topframe->fr_height;
1255#endif
1256 if (blanklines < 0)
1257 blanklines = 0;
1258
1259 /* Show the sponsor and register message one out of four times, the Uganda
1260 * message two out of four times. */
Bram Moolenaarf4cd3e82005-12-22 22:47:02 +00001261 sponsor = (int)time(NULL);
Bram Moolenaar071d4272004-06-13 20:20:40 +00001262 sponsor = ((sponsor & 2) == 0) - ((sponsor & 4) == 0);
1263
1264 /* start displaying the message lines after half of the blank lines */
1265 row = blanklines / 2;
1266 if ((row >= 2 && Columns >= 50) || colon)
1267 {
1268 for (i = 0; i < (int)(sizeof(lines) / sizeof(char *)); ++i)
1269 {
1270 p = lines[i];
1271#ifdef FEAT_GUI
1272 if (p_im && gui.in_use && gui_lines[i] != NULL)
1273 p = gui_lines[i];
1274#endif
1275 if (p == NULL)
1276 {
1277 if (!p_cp)
1278 break;
1279 continue;
1280 }
1281 if (sponsor != 0)
1282 {
1283 if (strstr(p, "children") != NULL)
1284 p = sponsor < 0
1285 ? N_("Sponsor Vim development!")
1286 : N_("Become a registered Vim user!");
1287 else if (strstr(p, "iccf") != NULL)
1288 p = sponsor < 0
1289 ? N_("type :help sponsor<Enter> for information ")
1290 : N_("type :help register<Enter> for information ");
1291 else if (strstr(p, "Orphans") != NULL)
1292 p = N_("menu Help->Sponsor/Register for information ");
1293 }
1294 if (*p != NUL)
1295 do_intro_line(row, (char_u *)_(p), i == 2, 0);
1296 ++row;
1297 }
1298#if defined(WIN3264) && !defined(FEAT_GUI_W32)
1299 if (mch_windows95())
1300 {
1301 do_intro_line(++row,
1302 (char_u *)_("WARNING: Windows 95/98/ME detected"),
1303 FALSE, hl_attr(HLF_E));
1304 do_intro_line(++row,
1305 (char_u *)_("type :help windows95<Enter> for info on this"),
1306 FALSE, 0);
1307 }
1308#endif
1309 }
1310
1311 /* Make the wait-return message appear just below the text. */
1312 if (colon)
1313 msg_row = row;
1314}
1315
1316 static void
1317do_intro_line(row, mesg, add_version, attr)
1318 int row;
1319 char_u *mesg;
1320 int add_version;
1321 int attr;
1322{
1323 char_u vers[20];
1324 int col;
1325 char_u *p;
1326 int l;
1327 int clen;
1328#ifdef MODIFIED_BY
1329# define MODBY_LEN 150
1330 char_u modby[MODBY_LEN];
1331
1332 if (*mesg == ' ')
1333 {
Bram Moolenaarce0842a2005-07-18 21:58:11 +00001334 vim_strncpy(modby, _("Modified by "), MODBY_LEN - 1);
Bram Moolenaar071d4272004-06-13 20:20:40 +00001335 l = STRLEN(modby);
Bram Moolenaarce0842a2005-07-18 21:58:11 +00001336 vim_strncpy(modby + l, MODIFIED_BY, MODBY_LEN - l - 1);
Bram Moolenaar071d4272004-06-13 20:20:40 +00001337 mesg = modby;
1338 }
1339#endif
1340
1341 /* Center the message horizontally. */
1342 col = vim_strsize(mesg);
1343 if (add_version)
1344 {
1345 STRCPY(vers, mediumVersion);
1346 if (highest_patch())
1347 {
1348 /* Check for 9.9x or 9.9xx, alpha/beta version */
1349 if (isalpha((int)mediumVersion[3]))
1350 {
1351 if (isalpha((int)mediumVersion[4]))
1352 sprintf((char *)vers + 5, ".%d%s", highest_patch(),
1353 mediumVersion + 5);
1354 else
1355 sprintf((char *)vers + 4, ".%d%s", highest_patch(),
1356 mediumVersion + 4);
1357 }
1358 else
1359 sprintf((char *)vers + 3, ".%d", highest_patch());
1360 }
1361 col += (int)STRLEN(vers);
1362 }
1363 col = (Columns - col) / 2;
1364 if (col < 0)
1365 col = 0;
1366
1367 /* Split up in parts to highlight <> items differently. */
1368 for (p = mesg; *p != NUL; p += l)
1369 {
1370 clen = 0;
1371 for (l = 0; p[l] != NUL
1372 && (l == 0 || (p[l] != '<' && p[l - 1] != '>')); ++l)
1373 {
1374#ifdef FEAT_MBYTE
1375 if (has_mbyte)
1376 {
1377 clen += ptr2cells(p + l);
Bram Moolenaar0fa313a2005-08-10 21:07:57 +00001378 l += (*mb_ptr2len)(p + l) - 1;
Bram Moolenaar071d4272004-06-13 20:20:40 +00001379 }
1380 else
1381#endif
1382 clen += byte2cells(p[l]);
1383 }
1384 screen_puts_len(p, l, row, col, *p == '<' ? hl_attr(HLF_8) : attr);
1385 col += clen;
1386 }
1387
1388 /* Add the version number to the version line. */
1389 if (add_version)
1390 screen_puts(vers, row, col, 0);
1391}
1392
1393/*
1394 * ":intro": clear screen, display intro screen and wait for return.
1395 */
1396/*ARGSUSED*/
1397 void
1398ex_intro(eap)
1399 exarg_T *eap;
1400{
1401 screenclear();
1402 intro_message(TRUE);
1403 wait_return(TRUE);
1404}