?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Dialog sheet animation can no longer cause a crash
[MacVim.git] / src / option.c
blobeb3076a5a074c228303385c4d78b57d5f57e16ab
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 /*
11 * Code to handle user-settable options. This is all pretty much table-
12 * driven. Checklist for adding a new option:
13 * - Put it in the options array below (copy an existing entry).
14 * - For a global option: Add a variable for it in option.h.
15 * - For a buffer or window local option:
16 * - Add a PV_XX entry to the enum below.
17 * - Add a variable to the window or buffer struct in structs.h.
18 * - For a window option, add some code to copy_winopt().
19 * - For a buffer option, add some code to buf_copy_options().
20 * - For a buffer string option, add code to check_buf_options().
21 * - If it's a numeric option, add any necessary bounds checks to do_set().
22 * - If it's a list of flags, add some code in do_set(), search for WW_ALL.
23 * - When adding an option with expansion (P_EXPAND), but with a different
24 * default for Vi and Vim (no P_VI_DEF), add some code at VIMEXP.
25 * - Add documentation! One line in doc/help.txt, full description in
26 * options.txt, and any other related places.
27 * - Add an entry in runtime/optwin.vim.
28 * When making changes:
29 * - Adjust the help for the option in doc/option.txt.
30 * - When an entry has the P_VIM flag, or is lacking the P_VI_DEF flag, add a
31 * comment at the help for the 'compatible' option.
32 */
33
34 #define IN_OPTION_C
35 #include "vim.h"
36
37 /*
38 * The options that are local to a window or buffer have "indir" set to one of
39 * these values. Special values:
40 * PV_NONE: global option.
41 * PV_WIN is added: window-local option
42 * PV_BUF is added: buffer-local option
43 * PV_BOTH is added: global option which also has a local value.
44 */
45 #define PV_BOTH 0x1000
46 #define PV_WIN 0x2000
47 #define PV_BUF 0x4000
48 #define PV_MASK 0x0fff
49 #define OPT_WIN(x) (idopt_T)(PV_WIN + (int)(x))
50 #define OPT_BUF(x) (idopt_T)(PV_BUF + (int)(x))
51 #define OPT_BOTH(x) (idopt_T)(PV_BOTH + (int)(x))
52
53 /*
54 * Definition of the PV_ values for buffer-local options.
55 * The BV_ values are defined in option.h.
56 */
57 #define PV_AI OPT_BUF(BV_AI)
58 #define PV_AR OPT_BOTH(OPT_BUF(BV_AR))
59 #ifdef FEAT_QUICKFIX
60 # define PV_BH OPT_BUF(BV_BH)
61 # define PV_BT OPT_BUF(BV_BT)
62 # define PV_EFM OPT_BOTH(OPT_BUF(BV_EFM))
63 # define PV_GP OPT_BOTH(OPT_BUF(BV_GP))
64 # define PV_MP OPT_BOTH(OPT_BUF(BV_MP))
65 #endif
66 #define PV_BIN OPT_BUF(BV_BIN)
67 #define PV_BL OPT_BUF(BV_BL)
68 #ifdef FEAT_MBYTE
69 # define PV_BOMB OPT_BUF(BV_BOMB)
70 #endif
71 #define PV_CI OPT_BUF(BV_CI)
72 #ifdef FEAT_CINDENT
73 # define PV_CIN OPT_BUF(BV_CIN)
74 # define PV_CINK OPT_BUF(BV_CINK)
75 # define PV_CINO OPT_BUF(BV_CINO)
76 #endif
77 #if defined(FEAT_SMARTINDENT) || defined(FEAT_CINDENT)
78 # define PV_CINW OPT_BUF(BV_CINW)
79 #endif
80 #ifdef FEAT_FOLDING
81 # define PV_CMS OPT_BUF(BV_CMS)
82 #endif
83 #ifdef FEAT_COMMENTS
84 # define PV_COM OPT_BUF(BV_COM)
85 #endif
86 #ifdef FEAT_INS_EXPAND
87 # define PV_CPT OPT_BUF(BV_CPT)
88 # define PV_DICT OPT_BOTH(OPT_BUF(BV_DICT))
89 # define PV_TSR OPT_BOTH(OPT_BUF(BV_TSR))
90 #endif
91 #ifdef FEAT_COMPL_FUNC
92 # define PV_CFU OPT_BUF(BV_CFU)
93 #endif
94 #ifdef FEAT_FIND_ID
95 # define PV_DEF OPT_BOTH(OPT_BUF(BV_DEF))
96 # define PV_INC OPT_BOTH(OPT_BUF(BV_INC))
97 #endif
98 #define PV_EOL OPT_BUF(BV_EOL)
99 #define PV_EP OPT_BOTH(OPT_BUF(BV_EP))
100 #define PV_ET OPT_BUF(BV_ET)
101 #ifdef FEAT_MBYTE
102 # define PV_FENC OPT_BUF(BV_FENC)
103 #endif
104 #if defined(FEAT_BEVAL) && defined(FEAT_EVAL)
105 # define PV_BEXPR OPT_BOTH(OPT_BUF(BV_BEXPR))
106 #endif
107 #ifdef FEAT_EVAL
108 # define PV_FEX OPT_BUF(BV_FEX)
109 #endif
110 #define PV_FF OPT_BUF(BV_FF)
111 #define PV_FLP OPT_BUF(BV_FLP)
112 #define PV_FO OPT_BUF(BV_FO)
113 #ifdef FEAT_AUTOCMD
114 # define PV_FT OPT_BUF(BV_FT)
115 #endif
116 #define PV_IMI OPT_BUF(BV_IMI)
117 #define PV_IMS OPT_BUF(BV_IMS)
118 #if defined(FEAT_CINDENT) && defined(FEAT_EVAL)
119 # define PV_INDE OPT_BUF(BV_INDE)
120 # define PV_INDK OPT_BUF(BV_INDK)
121 #endif
122 #if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
123 # define PV_INEX OPT_BUF(BV_INEX)
124 #endif
125 #define PV_INF OPT_BUF(BV_INF)
126 #define PV_ISK OPT_BUF(BV_ISK)
127 #ifdef FEAT_CRYPT
128 # define PV_KEY OPT_BUF(BV_KEY)
129 #endif
130 #ifdef FEAT_KEYMAP
131 # define PV_KMAP OPT_BUF(BV_KMAP)
132 #endif
133 #define PV_KP OPT_BOTH(OPT_BUF(BV_KP))
134 #ifdef FEAT_LISP
135 # define PV_LISP OPT_BUF(BV_LISP)
136 #endif
137 #define PV_MA OPT_BUF(BV_MA)
138 #define PV_ML OPT_BUF(BV_ML)
139 #define PV_MOD OPT_BUF(BV_MOD)
140 #define PV_MPS OPT_BUF(BV_MPS)
141 #ifdef FEAT_GUI_MACVIM
142 #define PV_MMTA OPT_BUF(BV_MMTA)
143 #endif
144 #define PV_NF OPT_BUF(BV_NF)
145 #ifdef FEAT_OSFILETYPE
146 # define PV_OFT OPT_BUF(BV_OFT)
147 #endif
148 #ifdef FEAT_COMPL_FUNC
149 # define PV_OFU OPT_BUF(BV_OFU)
150 #endif
151 #define PV_PATH OPT_BOTH(OPT_BUF(BV_PATH))
152 #define PV_PI OPT_BUF(BV_PI)
153 #ifdef FEAT_TEXTOBJ
154 # define PV_QE OPT_BUF(BV_QE)
155 #endif
156 #define PV_RO OPT_BUF(BV_RO)
157 #ifdef FEAT_SMARTINDENT
158 # define PV_SI OPT_BUF(BV_SI)
159 #endif
160 #ifndef SHORT_FNAME
161 # define PV_SN OPT_BUF(BV_SN)
162 #endif
163 #ifdef FEAT_SYN_HL
164 # define PV_SMC OPT_BUF(BV_SMC)
165 # define PV_SYN OPT_BUF(BV_SYN)
166 #endif
167 #ifdef FEAT_SPELL
168 # define PV_SPC OPT_BUF(BV_SPC)
169 # define PV_SPF OPT_BUF(BV_SPF)
170 # define PV_SPL OPT_BUF(BV_SPL)
171 #endif
172 #define PV_STS OPT_BUF(BV_STS)
173 #ifdef FEAT_SEARCHPATH
174 # define PV_SUA OPT_BUF(BV_SUA)
175 #endif
176 #define PV_SW OPT_BUF(BV_SW)
177 #define PV_SWF OPT_BUF(BV_SWF)
178 #define PV_TAGS OPT_BOTH(OPT_BUF(BV_TAGS))
179 #define PV_TS OPT_BUF(BV_TS)
180 #define PV_TW OPT_BUF(BV_TW)
181 #define PV_TX OPT_BUF(BV_TX)
182 #define PV_WM OPT_BUF(BV_WM)
183
184 /*
185 * Definition of the PV_ values for window-local options.
186 * The WV_ values are defined in option.h.
187 */
188 #define PV_LIST OPT_WIN(WV_LIST)
189 #ifdef FEAT_ARABIC
190 # define PV_ARAB OPT_WIN(WV_ARAB)
191 #endif
192 #ifdef FEAT_DIFF
193 # define PV_DIFF OPT_WIN(WV_DIFF)
194 #endif
195 #ifdef FEAT_FOLDING
196 # define PV_FDC OPT_WIN(WV_FDC)
197 # define PV_FEN OPT_WIN(WV_FEN)
198 # define PV_FDI OPT_WIN(WV_FDI)
199 # define PV_FDL OPT_WIN(WV_FDL)
200 # define PV_FDM OPT_WIN(WV_FDM)
201 # define PV_FML OPT_WIN(WV_FML)
202 # define PV_FDN OPT_WIN(WV_FDN)
203 # ifdef FEAT_EVAL
204 # define PV_FDE OPT_WIN(WV_FDE)
205 # define PV_FDT OPT_WIN(WV_FDT)
206 # endif
207 # define PV_FMR OPT_WIN(WV_FMR)
208 #endif
209 #ifdef FEAT_LINEBREAK
210 # define PV_LBR OPT_WIN(WV_LBR)
211 #endif
212 #define PV_NU OPT_WIN(WV_NU)
213 #ifdef FEAT_LINEBREAK
214 # define PV_NUW OPT_WIN(WV_NUW)
215 #endif
216 #if defined(FEAT_WINDOWS) && defined(FEAT_QUICKFIX)
217 # define PV_PVW OPT_WIN(WV_PVW)
218 #endif
219 #ifdef FEAT_RIGHTLEFT
220 # define PV_RL OPT_WIN(WV_RL)
221 # define PV_RLC OPT_WIN(WV_RLC)
222 #endif
223 #ifdef FEAT_SCROLLBIND
224 # define PV_SCBIND OPT_WIN(WV_SCBIND)
225 #endif
226 #define PV_SCROLL OPT_WIN(WV_SCROLL)
227 #ifdef FEAT_SPELL
228 # define PV_SPELL OPT_WIN(WV_SPELL)
229 #endif
230 #ifdef FEAT_SYN_HL
231 # define PV_CUC OPT_WIN(WV_CUC)
232 # define PV_CUL OPT_WIN(WV_CUL)
233 #endif
234 #ifdef FEAT_STL_OPT
235 # define PV_STL OPT_BOTH(OPT_WIN(WV_STL))
236 #endif
237 #ifdef FEAT_WINDOWS
238 # define PV_WFH OPT_WIN(WV_WFH)
239 #endif
240 #ifdef FEAT_VERTSPLIT
241 # define PV_WFW OPT_WIN(WV_WFW)
242 #endif
243 #define PV_WRAP OPT_WIN(WV_WRAP)
244
245
246 /* WV_ and BV_ values get typecasted to this for the "indir" field */
247 typedef enum
248 {
249 PV_NONE = 0,
250 PV_MAXVAL = 0xffff /* to avoid warnings for value out of range */
251 } idopt_T;
252
253 /*
254 * Options local to a window have a value local to a buffer and global to all
255 * buffers. Indicate this by setting "var" to VAR_WIN.
256 */
257 #define VAR_WIN ((char_u *)-1)
258
259 /*
260 * These are the global values for options which are also local to a buffer.
261 * Only to be used in option.c!
262 */
263 static int p_ai;
264 static int p_bin;
265 #ifdef FEAT_MBYTE
266 static int p_bomb;
267 #endif
268 #if defined(FEAT_QUICKFIX)
269 static char_u *p_bh;
270 static char_u *p_bt;
271 #endif
272 static int p_bl;
273 static int p_ci;
274 #ifdef FEAT_CINDENT
275 static int p_cin;
276 static char_u *p_cink;
277 static char_u *p_cino;
278 #endif
279 #if defined(FEAT_SMARTINDENT) || defined(FEAT_CINDENT)
280 static char_u *p_cinw;
281 #endif
282 #ifdef FEAT_COMMENTS
283 static char_u *p_com;
284 #endif
285 #ifdef FEAT_FOLDING
286 static char_u *p_cms;
287 #endif
288 #ifdef FEAT_INS_EXPAND
289 static char_u *p_cpt;
290 #endif
291 #ifdef FEAT_COMPL_FUNC
292 static char_u *p_cfu;
293 static char_u *p_ofu;
294 #endif
295 static int p_eol;
296 static int p_et;
297 #ifdef FEAT_MBYTE
298 static char_u *p_fenc;
299 #endif
300 static char_u *p_ff;
301 static char_u *p_fo;
302 static char_u *p_flp;
303 #ifdef FEAT_AUTOCMD
304 static char_u *p_ft;
305 #endif
306 static long p_iminsert;
307 static long p_imsearch;
308 #if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
309 static char_u *p_inex;
310 #endif
311 #if defined(FEAT_CINDENT) && defined(FEAT_EVAL)
312 static char_u *p_inde;
313 static char_u *p_indk;
314 #endif
315 #if defined(FEAT_EVAL)
316 static char_u *p_fex;
317 #endif
318 static int p_inf;
319 static char_u *p_isk;
320 #ifdef FEAT_CRYPT
321 static char_u *p_key;
322 #endif
323 #ifdef FEAT_LISP
324 static int p_lisp;
325 #endif
326 static int p_ml;
327 static int p_ma;
328 #ifdef FEAT_GUI_MACVIM
329 static int p_mmta;
330 #endif
331 static int p_mod;
332 static char_u *p_mps;
333 static char_u *p_nf;
334 #ifdef FEAT_OSFILETYPE
335 static char_u *p_oft;
336 #endif
337 static int p_pi;
338 #ifdef FEAT_TEXTOBJ
339 static char_u *p_qe;
340 #endif
341 static int p_ro;
342 #ifdef FEAT_SMARTINDENT
343 static int p_si;
344 #endif
345 #ifndef SHORT_FNAME
346 static int p_sn;
347 #endif
348 static long p_sts;
349 #if defined(FEAT_SEARCHPATH)
350 static char_u *p_sua;
351 #endif
352 static long p_sw;
353 static int p_swf;
354 #ifdef FEAT_SYN_HL
355 static long p_smc;
356 static char_u *p_syn;
357 #endif
358 #ifdef FEAT_SPELL
359 static char_u *p_spc;
360 static char_u *p_spf;
361 static char_u *p_spl;
362 #endif
363 static long p_ts;
364 static long p_tw;
365 static int p_tx;
366 static long p_wm;
367 #ifdef FEAT_KEYMAP
368 static char_u *p_keymap;
369 #endif
370
371 /* Saved values for when 'bin' is set. */
372 static int p_et_nobin;
373 static int p_ml_nobin;
374 static long p_tw_nobin;
375 static long p_wm_nobin;
376
377 /* Saved values for when 'paste' is set */
378 static long p_tw_nopaste;
379 static long p_wm_nopaste;
380 static long p_sts_nopaste;
381 static int p_ai_nopaste;
382
383 struct vimoption
384 {
385 char *fullname; /* full option name */
386 char *shortname; /* permissible abbreviation */
387 long_u flags; /* see below */
388 char_u *var; /* global option: pointer to variable;
389 * window-local option: VAR_WIN;
390 * buffer-local option: global value */
391 idopt_T indir; /* global option: PV_NONE;
392 * local option: indirect option index */
393 char_u *def_val[2]; /* default values for variable (vi and vim) */
394 #ifdef FEAT_EVAL
395 scid_T scriptID; /* script in which the option was last set */
396 # define SCRIPTID_INIT , 0
397 #else
398 # define SCRIPTID_INIT
399 #endif
400 };
401
402 #define VI_DEFAULT 0 /* def_val[VI_DEFAULT] is Vi default value */
403 #define VIM_DEFAULT 1 /* def_val[VIM_DEFAULT] is Vim default value */
404
405 /*
406 * Flags
407 */
408 #define P_BOOL 0x01 /* the option is boolean */
409 #define P_NUM 0x02 /* the option is numeric */
410 #define P_STRING 0x04 /* the option is a string */
411 #define P_ALLOCED 0x08 /* the string option is in allocated memory,
412 must use vim_free() when assigning new
413 value. Not set if default is the same. */
414 #define P_EXPAND 0x10 /* environment expansion. NOTE: P_EXPAND can
415 never be used for local or hidden options! */
416 #define P_NODEFAULT 0x40 /* don't set to default value */
417 #define P_DEF_ALLOCED 0x80 /* default value is in allocated memory, must
418 use vim_free() when assigning new value */
419 #define P_WAS_SET 0x100 /* option has been set/reset */
420 #define P_NO_MKRC 0x200 /* don't include in :mkvimrc output */
421 #define P_VI_DEF 0x400 /* Use Vi default for Vim */
422 #define P_VIM 0x800 /* Vim option, reset when 'cp' set */
423
424 /* when option changed, what to display: */
425 #define P_RSTAT 0x1000 /* redraw status lines */
426 #define P_RWIN 0x2000 /* redraw current window */
427 #define P_RBUF 0x4000 /* redraw current buffer */
428 #define P_RALL 0x6000 /* redraw all windows */
429 #define P_RCLR 0x7000 /* clear and redraw all */
430
431 #define P_COMMA 0x8000 /* comma separated list */
432 #define P_NODUP 0x10000L/* don't allow duplicate strings */
433 #define P_FLAGLIST 0x20000L/* list of single-char flags */
434
435 #define P_SECURE 0x40000L/* cannot change in modeline or secure mode */
436 #define P_GETTEXT 0x80000L/* expand default value with _() */
437 #define P_NOGLOB 0x100000L/* do not use local value for global vimrc */
438 #define P_NFNAME 0x200000L/* only normal file name chars allowed */
439 #define P_INSECURE 0x400000L/* option was set from a modeline */
440 #define P_PRI_MKRC 0x800000L/* priority for :mkvimrc (setting option has
441 side effects) */
442
443 #define ISK_LATIN1 (char_u *)"@,48-57,_,192-255"
444
445 /* 'isprint' for latin1 is also used for MS-Windows cp1252, where 0x80 is used
446 * for the currency sign. */
447 #if defined(MSDOS) || defined(MSWIN) || defined(OS2)
448 # define ISP_LATIN1 (char_u *)"@,~-255"
449 #else
450 # define ISP_LATIN1 (char_u *)"@,161-255"
451 #endif
452
453 /* The 16 bit MS-DOS version is low on space, make the string as short as
454 * possible when compiling with few features. */
455 #if defined(FEAT_DIFF) || defined(FEAT_FOLDING) || defined(FEAT_SPELL) \
456 || defined(FEAT_VERTSPLIT) || defined(FEAT_CLIPBOARD) \
457 || defined(FEAT_INS_EXPAND) || defined(FEAT_SYN_HL)
458 # define HIGHLIGHT_INIT "8:SpecialKey,@:NonText,d:Directory,e:ErrorMsg,i:IncSearch,l:Search,m:MoreMsg,M:ModeMsg,n:LineNr,r:Question,s:StatusLine,S:StatusLineNC,c:VertSplit,t:Title,v:Visual,V:VisualNOS,w:WarningMsg,W:WildMenu,f:Folded,F:FoldColumn,A:DiffAdd,C:DiffChange,D:DiffDelete,T:DiffText,>:SignColumn,B:SpellBad,P:SpellCap,R:SpellRare,L:SpellLocal,+:Pmenu,=:PmenuSel,x:PmenuSbar,X:PmenuThumb,*:TabLine,#:TabLineSel,_:TabLineFill,!:CursorColumn,.:CursorLine"
459 #else
460 # define HIGHLIGHT_INIT "8:SpecialKey,@:NonText,d:Directory,e:ErrorMsg,i:IncSearch,l:Search,m:MoreMsg,M:ModeMsg,n:LineNr,r:Question,s:StatusLine,S:StatusLineNC,t:Title,v:Visual,w:WarningMsg,W:WildMenu,>:SignColumn,*:TabLine,#:TabLineSel,_:TabLineFill"
461 #endif
462
463 /*
464 * options[] is initialized here.
465 * The order of the options MUST be alphabetic for ":set all" and findoption().
466 * All option names MUST start with a lowercase letter (for findoption()).
467 * Exception: "t_" options are at the end.
468 * The options with a NULL variable are 'hidden': a set command for them is
469 * ignored and they are not printed.
470 */
471 static struct vimoption
472 #ifdef FEAT_GUI_W16
473 _far
474 #endif
475 options[] =
476 {
477 {"aleph", "al", P_NUM|P_VI_DEF,
478 #ifdef FEAT_RIGHTLEFT
479 (char_u *)&p_aleph, PV_NONE,
480 #else
481 (char_u *)NULL, PV_NONE,
482 #endif
483 {
484 #if (defined(MSDOS) || defined(WIN3264) || defined(OS2)) && !defined(FEAT_GUI_W32)
485 (char_u *)128L,
486 #else
487 (char_u *)224L,
488 #endif
489 (char_u *)0L} SCRIPTID_INIT},
490 {"antialias", "anti", P_BOOL|P_VI_DEF|P_VIM|P_RCLR,
491 #ifdef FEAT_ANTIALIAS
492 (char_u *)&p_antialias, PV_NONE,
493 #else
494 (char_u *)NULL, PV_NONE,
495 #endif
496 {
497 #if FEAT_GUI_MACVIM
498 (char_u *)TRUE,
499 #else
500 (char_u *)FALSE,
501 #endif
502 (char_u *)0L} SCRIPTID_INIT},
503 {"arabic", "arab", P_BOOL|P_VI_DEF|P_VIM,
504 #ifdef FEAT_ARABIC
505 (char_u *)VAR_WIN, PV_ARAB,
506 #else
507 (char_u *)NULL, PV_NONE,
508 #endif
509 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
510 {"arabicshape", "arshape", P_BOOL|P_VI_DEF|P_VIM|P_RCLR,
511 #ifdef FEAT_ARABIC
512 (char_u *)&p_arshape, PV_NONE,
513 #else
514 (char_u *)NULL, PV_NONE,
515 #endif
516 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
517 {"allowrevins", "ari", P_BOOL|P_VI_DEF|P_VIM,
518 #ifdef FEAT_RIGHTLEFT
519 (char_u *)&p_ari, PV_NONE,
520 #else
521 (char_u *)NULL, PV_NONE,
522 #endif
523 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
524 {"altkeymap", "akm", P_BOOL|P_VI_DEF,
525 #ifdef FEAT_FKMAP
526 (char_u *)&p_altkeymap, PV_NONE,
527 #else
528 (char_u *)NULL, PV_NONE,
529 #endif
530 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
531 {"ambiwidth", "ambw", P_STRING|P_VI_DEF|P_RCLR,
532 #if defined(FEAT_MBYTE)
533 (char_u *)&p_ambw, PV_NONE,
534 {(char_u *)"single", (char_u *)0L}
535 #else
536 (char_u *)NULL, PV_NONE,
537 {(char_u *)0L, (char_u *)0L}
538 #endif
539 SCRIPTID_INIT},
540 #ifdef FEAT_AUTOCHDIR
541 {"autochdir", "acd", P_BOOL|P_VI_DEF,
542 (char_u *)&p_acd, PV_NONE,
543 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
544 #endif
545 {"autoindent", "ai", P_BOOL|P_VI_DEF,
546 (char_u *)&p_ai, PV_AI,
547 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
548 {"autoprint", "ap", P_BOOL|P_VI_DEF,
549 (char_u *)NULL, PV_NONE,
550 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
551 {"autoread", "ar", P_BOOL|P_VI_DEF,
552 (char_u *)&p_ar, PV_AR,
553 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
554 {"autowrite", "aw", P_BOOL|P_VI_DEF,
555 (char_u *)&p_aw, PV_NONE,
556 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
557 {"autowriteall","awa", P_BOOL|P_VI_DEF,
558 (char_u *)&p_awa, PV_NONE,
559 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
560 {"background", "bg", P_STRING|P_VI_DEF|P_RCLR,
561 (char_u *)&p_bg, PV_NONE,
562 {
563 #if (defined(MSDOS) || defined(OS2) || defined(WIN3264)) && !defined(FEAT_GUI)
564 (char_u *)"dark",
565 #else
566 (char_u *)"light",
567 #endif
568 (char_u *)0L} SCRIPTID_INIT},
569 {"backspace", "bs", P_STRING|P_VI_DEF|P_VIM|P_COMMA|P_NODUP,
570 (char_u *)&p_bs, PV_NONE,
571 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
572 {"backup", "bk", P_BOOL|P_VI_DEF|P_VIM,
573 (char_u *)&p_bk, PV_NONE,
574 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
575 {"backupcopy", "bkc", P_STRING|P_VIM|P_COMMA|P_NODUP,
576 (char_u *)&p_bkc, PV_NONE,
577 #ifdef UNIX
578 {(char_u *)"yes", (char_u *)"auto"}
579 #else
580 {(char_u *)"auto", (char_u *)"auto"}
581 #endif
582 SCRIPTID_INIT},
583 {"backupdir", "bdir", P_STRING|P_EXPAND|P_VI_DEF|P_COMMA|P_NODUP|P_SECURE,
584 (char_u *)&p_bdir, PV_NONE,
585 {(char_u *)DFLT_BDIR, (char_u *)0L} SCRIPTID_INIT},
586 {"backupext", "bex", P_STRING|P_VI_DEF|P_NFNAME,
587 (char_u *)&p_bex, PV_NONE,
588 {
589 #ifdef VMS
590 (char_u *)"_",
591 #else
592 (char_u *)"~",
593 #endif
594 (char_u *)0L} SCRIPTID_INIT},
595 {"backupskip", "bsk", P_STRING|P_VI_DEF|P_COMMA,
596 #ifdef FEAT_WILDIGN
597 (char_u *)&p_bsk, PV_NONE,
598 {(char_u *)"", (char_u *)0L}
599 #else
600 (char_u *)NULL, PV_NONE,
601 {(char_u *)0L, (char_u *)0L}
602 #endif
603 SCRIPTID_INIT},
604 #ifdef FEAT_BEVAL
605 {"balloondelay","bdlay",P_NUM|P_VI_DEF,
606 (char_u *)&p_bdlay, PV_NONE,
607 {(char_u *)600L, (char_u *)0L} SCRIPTID_INIT},
608 {"ballooneval", "beval",P_BOOL|P_VI_DEF|P_NO_MKRC,
609 (char_u *)&p_beval, PV_NONE,
610 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
611 # ifdef FEAT_EVAL
612 {"balloonexpr", "bexpr", P_STRING|P_ALLOCED|P_VI_DEF|P_VIM,
613 (char_u *)&p_bexpr, PV_BEXPR,
614 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
615 # endif
616 #endif
617 {"beautify", "bf", P_BOOL|P_VI_DEF,
618 (char_u *)NULL, PV_NONE,
619 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
620 {"binary", "bin", P_BOOL|P_VI_DEF|P_RSTAT,
621 (char_u *)&p_bin, PV_BIN,
622 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
623 {"bioskey", "biosk",P_BOOL|P_VI_DEF,
624 #ifdef MSDOS
625 (char_u *)&p_biosk, PV_NONE,
626 #else
627 (char_u *)NULL, PV_NONE,
628 #endif
629 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
630 {"bomb", NULL, P_BOOL|P_NO_MKRC|P_VI_DEF|P_RSTAT,
631 #ifdef FEAT_MBYTE
632 (char_u *)&p_bomb, PV_BOMB,
633 #else
634 (char_u *)NULL, PV_NONE,
635 #endif
636 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
637 {"breakat", "brk", P_STRING|P_VI_DEF|P_RALL|P_FLAGLIST,
638 #ifdef FEAT_LINEBREAK
639 (char_u *)&p_breakat, PV_NONE,
640 {(char_u *)" \t!@*-+;:,./?", (char_u *)0L}
641 #else
642 (char_u *)NULL, PV_NONE,
643 {(char_u *)0L, (char_u *)0L}
644 #endif
645 SCRIPTID_INIT},
646 {"browsedir", "bsdir",P_STRING|P_VI_DEF,
647 #ifdef FEAT_BROWSE
648 (char_u *)&p_bsdir, PV_NONE,
649 {(char_u *)"last", (char_u *)0L}
650 #else
651 (char_u *)NULL, PV_NONE,
652 {(char_u *)0L, (char_u *)0L}
653 #endif
654 SCRIPTID_INIT},
655 {"bufhidden", "bh", P_STRING|P_ALLOCED|P_VI_DEF|P_NOGLOB,
656 #if defined(FEAT_QUICKFIX)
657 (char_u *)&p_bh, PV_BH,
658 {(char_u *)"", (char_u *)0L}
659 #else
660 (char_u *)NULL, PV_NONE,
661 {(char_u *)0L, (char_u *)0L}
662 #endif
663 SCRIPTID_INIT},
664 {"buflisted", "bl", P_BOOL|P_VI_DEF|P_NOGLOB,
665 (char_u *)&p_bl, PV_BL,
666 {(char_u *)1L, (char_u *)0L}
667 SCRIPTID_INIT},
668 {"buftype", "bt", P_STRING|P_ALLOCED|P_VI_DEF|P_NOGLOB,
669 #if defined(FEAT_QUICKFIX)
670 (char_u *)&p_bt, PV_BT,
671 {(char_u *)"", (char_u *)0L}
672 #else
673 (char_u *)NULL, PV_NONE,
674 {(char_u *)0L, (char_u *)0L}
675 #endif
676 SCRIPTID_INIT},
677 {"casemap", "cmp", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
678 #ifdef FEAT_MBYTE
679 (char_u *)&p_cmp, PV_NONE,
680 {(char_u *)"internal,keepascii", (char_u *)0L}
681 #else
682 (char_u *)NULL, PV_NONE,
683 {(char_u *)0L, (char_u *)0L}
684 #endif
685 SCRIPTID_INIT},
686 {"cdpath", "cd", P_STRING|P_EXPAND|P_VI_DEF|P_COMMA|P_NODUP,
687 #ifdef FEAT_SEARCHPATH
688 (char_u *)&p_cdpath, PV_NONE,
689 {(char_u *)",,", (char_u *)0L}
690 #else
691 (char_u *)NULL, PV_NONE,
692 {(char_u *)0L, (char_u *)0L}
693 #endif
694 SCRIPTID_INIT},
695 {"cedit", NULL, P_STRING,
696 #ifdef FEAT_CMDWIN
697 (char_u *)&p_cedit, PV_NONE,
698 {(char_u *)"", (char_u *)CTRL_F_STR}
699 #else
700 (char_u *)NULL, PV_NONE,
701 {(char_u *)0L, (char_u *)0L}
702 #endif
703 SCRIPTID_INIT},
704 {"charconvert", "ccv", P_STRING|P_VI_DEF|P_SECURE,
705 #if defined(FEAT_MBYTE) && defined(FEAT_EVAL)
706 (char_u *)&p_ccv, PV_NONE,
707 {(char_u *)"", (char_u *)0L}
708 #else
709 (char_u *)NULL, PV_NONE,
710 {(char_u *)0L, (char_u *)0L}
711 #endif
712 SCRIPTID_INIT},
713 {"cindent", "cin", P_BOOL|P_VI_DEF|P_VIM,
714 #ifdef FEAT_CINDENT
715 (char_u *)&p_cin, PV_CIN,
716 #else
717 (char_u *)NULL, PV_NONE,
718 #endif
719 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
720 {"cinkeys", "cink", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_NODUP,
721 #ifdef FEAT_CINDENT
722 (char_u *)&p_cink, PV_CINK,
723 {(char_u *)"0{,0},0),:,0#,!^F,o,O,e", (char_u *)0L}
724 #else
725 (char_u *)NULL, PV_NONE,
726 {(char_u *)0L, (char_u *)0L}
727 #endif
728 SCRIPTID_INIT},
729 {"cinoptions", "cino", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_NODUP,
730 #ifdef FEAT_CINDENT
731 (char_u *)&p_cino, PV_CINO,
732 #else
733 (char_u *)NULL, PV_NONE,
734 #endif
735 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
736 {"cinwords", "cinw", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_NODUP,
737 #if defined(FEAT_SMARTINDENT) || defined(FEAT_CINDENT)
738 (char_u *)&p_cinw, PV_CINW,
739 {(char_u *)"if,else,while,do,for,switch",
740 (char_u *)0L}
741 #else
742 (char_u *)NULL, PV_NONE,
743 {(char_u *)0L, (char_u *)0L}
744 #endif
745 SCRIPTID_INIT},
746 {"clipboard", "cb", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
747 #ifdef FEAT_CLIPBOARD
748 (char_u *)&p_cb, PV_NONE,
749 # ifdef FEAT_XCLIPBOARD
750 {(char_u *)"autoselect,exclude:cons\\|linux",
751 (char_u *)0L}
752 # else
753 {(char_u *)"", (char_u *)0L}
754 # endif
755 #else
756 (char_u *)NULL, PV_NONE,
757 {(char_u *)"", (char_u *)0L}
758 #endif
759 SCRIPTID_INIT},
760 {"cmdheight", "ch", P_NUM|P_VI_DEF|P_RALL,
761 (char_u *)&p_ch, PV_NONE,
762 {(char_u *)1L, (char_u *)0L} SCRIPTID_INIT},
763 {"cmdwinheight", "cwh", P_NUM|P_VI_DEF,
764 #ifdef FEAT_CMDWIN
765 (char_u *)&p_cwh, PV_NONE,
766 #else
767 (char_u *)NULL, PV_NONE,
768 #endif
769 {(char_u *)7L, (char_u *)0L} SCRIPTID_INIT},
770 {"columns", "co", P_NUM|P_NODEFAULT|P_NO_MKRC|P_VI_DEF|P_RCLR,
771 (char_u *)&Columns, PV_NONE,
772 {(char_u *)80L, (char_u *)0L} SCRIPTID_INIT},
773 {"comments", "com", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_NODUP,
774 #ifdef FEAT_COMMENTS
775 (char_u *)&p_com, PV_COM,
776 {(char_u *)"s1:/*,mb:*,ex:*/,://,b:#,:%,:XCOMM,n:>,fb:-",
777 (char_u *)0L}
778 #else
779 (char_u *)NULL, PV_NONE,
780 {(char_u *)0L, (char_u *)0L}
781 #endif
782 SCRIPTID_INIT},
783 {"commentstring", "cms", P_STRING|P_ALLOCED|P_VI_DEF,
784 #ifdef FEAT_FOLDING
785 (char_u *)&p_cms, PV_CMS,
786 {(char_u *)"/*%s*/", (char_u *)0L}
787 #else
788 (char_u *)NULL, PV_NONE,
789 {(char_u *)0L, (char_u *)0L}
790 #endif
791 SCRIPTID_INIT},
792 /* P_PRI_MKRC isn't needed here, optval_default()
793 * always returns TRUE for 'compatible' */
794 {"compatible", "cp", P_BOOL|P_RALL,
795 (char_u *)&p_cp, PV_NONE,
796 {(char_u *)TRUE, (char_u *)FALSE} SCRIPTID_INIT},
797 {"complete", "cpt", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_NODUP,
798 #ifdef FEAT_INS_EXPAND
799 (char_u *)&p_cpt, PV_CPT,
800 {(char_u *)".,w,b,u,t,i", (char_u *)0L}
801 #else
802 (char_u *)NULL, PV_NONE,
803 {(char_u *)0L, (char_u *)0L}
804 #endif
805 SCRIPTID_INIT},
806 {"completefunc", "cfu", P_STRING|P_ALLOCED|P_VI_DEF|P_SECURE,
807 #ifdef FEAT_COMPL_FUNC
808 (char_u *)&p_cfu, PV_CFU,
809 {(char_u *)"", (char_u *)0L}
810 #else
811 (char_u *)NULL, PV_NONE,
812 {(char_u *)0L, (char_u *)0L}
813 #endif
814 SCRIPTID_INIT},
815 {"completeopt", "cot", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
816 #ifdef FEAT_INS_EXPAND
817 (char_u *)&p_cot, PV_NONE,
818 {(char_u *)"menu,preview", (char_u *)0L}
819 #else
820 (char_u *)NULL, PV_NONE,
821 {(char_u *)0L, (char_u *)0L}
822 #endif
823 SCRIPTID_INIT},
824 {"confirm", "cf", P_BOOL|P_VI_DEF,
825 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG)
826 (char_u *)&p_confirm, PV_NONE,
827 #else
828 (char_u *)NULL, PV_NONE,
829 #endif
830 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
831 {"conskey", "consk",P_BOOL|P_VI_DEF,
832 #ifdef MSDOS
833 (char_u *)&p_consk, PV_NONE,
834 #else
835 (char_u *)NULL, PV_NONE,
836 #endif
837 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
838 {"copyindent", "ci", P_BOOL|P_VI_DEF|P_VIM,
839 (char_u *)&p_ci, PV_CI,
840 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
841 {"cpoptions", "cpo", P_STRING|P_VIM|P_RALL|P_FLAGLIST,
842 (char_u *)&p_cpo, PV_NONE,
843 {(char_u *)CPO_VI, (char_u *)CPO_VIM}
844 SCRIPTID_INIT},
845 {"cscopepathcomp", "cspc", P_NUM|P_VI_DEF|P_VIM,
846 #ifdef FEAT_CSCOPE
847 (char_u *)&p_cspc, PV_NONE,
848 #else
849 (char_u *)NULL, PV_NONE,
850 #endif
851 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
852 {"cscopeprg", "csprg", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
853 #ifdef FEAT_CSCOPE
854 (char_u *)&p_csprg, PV_NONE,
855 {(char_u *)"cscope", (char_u *)0L}
856 #else
857 (char_u *)NULL, PV_NONE,
858 {(char_u *)0L, (char_u *)0L}
859 #endif
860 SCRIPTID_INIT},
861 {"cscopequickfix", "csqf", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
862 #if defined(FEAT_CSCOPE) && defined(FEAT_QUICKFIX)
863 (char_u *)&p_csqf, PV_NONE,
864 {(char_u *)"", (char_u *)0L}
865 #else
866 (char_u *)NULL, PV_NONE,
867 {(char_u *)0L, (char_u *)0L}
868 #endif
869 SCRIPTID_INIT},
870 {"cscopetag", "cst", P_BOOL|P_VI_DEF|P_VIM,
871 #ifdef FEAT_CSCOPE
872 (char_u *)&p_cst, PV_NONE,
873 #else
874 (char_u *)NULL, PV_NONE,
875 #endif
876 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
877 {"cscopetagorder", "csto", P_NUM|P_VI_DEF|P_VIM,
878 #ifdef FEAT_CSCOPE
879 (char_u *)&p_csto, PV_NONE,
880 #else
881 (char_u *)NULL, PV_NONE,
882 #endif
883 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
884 {"cscopeverbose", "csverb", P_BOOL|P_VI_DEF|P_VIM,
885 #ifdef FEAT_CSCOPE
886 (char_u *)&p_csverbose, PV_NONE,
887 #else
888 (char_u *)NULL, PV_NONE,
889 #endif
890 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
891 {"cursorcolumn", "cuc", P_BOOL|P_VI_DEF|P_RWIN,
892 #ifdef FEAT_SYN_HL
893 (char_u *)VAR_WIN, PV_CUC,
894 #else
895 (char_u *)NULL, PV_NONE,
896 #endif
897 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
898 {"cursorline", "cul", P_BOOL|P_VI_DEF|P_RWIN,
899 #ifdef FEAT_SYN_HL
900 (char_u *)VAR_WIN, PV_CUL,
901 #else
902 (char_u *)NULL, PV_NONE,
903 #endif
904 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
905 {"debug", NULL, P_STRING|P_VI_DEF,
906 (char_u *)&p_debug, PV_NONE,
907 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
908 {"define", "def", P_STRING|P_ALLOCED|P_VI_DEF,
909 #ifdef FEAT_FIND_ID
910 (char_u *)&p_def, PV_DEF,
911 {(char_u *)"^\\s*#\\s*define", (char_u *)0L}
912 #else
913 (char_u *)NULL, PV_NONE,
914 {(char_u *)NULL, (char_u *)0L}
915 #endif
916 SCRIPTID_INIT},
917 {"delcombine", "deco", P_BOOL|P_VI_DEF|P_VIM,
918 #ifdef FEAT_MBYTE
919 (char_u *)&p_deco, PV_NONE,
920 #else
921 (char_u *)NULL, PV_NONE,
922 #endif
923 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
924 {"dictionary", "dict", P_STRING|P_EXPAND|P_VI_DEF|P_COMMA|P_NODUP,
925 #ifdef FEAT_INS_EXPAND
926 (char_u *)&p_dict, PV_DICT,
927 #else
928 (char_u *)NULL, PV_NONE,
929 #endif
930 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
931 {"diff", NULL, P_BOOL|P_VI_DEF|P_RWIN|P_NOGLOB,
932 #ifdef FEAT_DIFF
933 (char_u *)VAR_WIN, PV_DIFF,
934 #else
935 (char_u *)NULL, PV_NONE,
936 #endif
937 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
938 {"diffexpr", "dex", P_STRING|P_VI_DEF|P_SECURE,
939 #if defined(FEAT_DIFF) && defined(FEAT_EVAL)
940 (char_u *)&p_dex, PV_NONE,
941 {(char_u *)"", (char_u *)0L}
942 #else
943 (char_u *)NULL, PV_NONE,
944 {(char_u *)0L, (char_u *)0L}
945 #endif
946 SCRIPTID_INIT},
947 {"diffopt", "dip", P_STRING|P_ALLOCED|P_VI_DEF|P_RWIN|P_COMMA|P_NODUP,
948 #ifdef FEAT_DIFF
949 (char_u *)&p_dip, PV_NONE,
950 {(char_u *)"filler", (char_u *)NULL}
951 #else
952 (char_u *)NULL, PV_NONE,
953 {(char_u *)"", (char_u *)NULL}
954 #endif
955 SCRIPTID_INIT},
956 {"digraph", "dg", P_BOOL|P_VI_DEF|P_VIM,
957 #ifdef FEAT_DIGRAPHS
958 (char_u *)&p_dg, PV_NONE,
959 #else
960 (char_u *)NULL, PV_NONE,
961 #endif
962 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
963 {"directory", "dir", P_STRING|P_EXPAND|P_VI_DEF|P_COMMA|P_NODUP|P_SECURE,
964 (char_u *)&p_dir, PV_NONE,
965 {(char_u *)DFLT_DIR, (char_u *)0L} SCRIPTID_INIT},
966 {"display", "dy", P_STRING|P_VI_DEF|P_COMMA|P_RALL|P_NODUP,
967 (char_u *)&p_dy, PV_NONE,
968 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
969 {"eadirection", "ead", P_STRING|P_VI_DEF,
970 #ifdef FEAT_VERTSPLIT
971 (char_u *)&p_ead, PV_NONE,
972 {(char_u *)"both", (char_u *)0L}
973 #else
974 (char_u *)NULL, PV_NONE,
975 {(char_u *)NULL, (char_u *)0L}
976 #endif
977 SCRIPTID_INIT},
978 {"edcompatible","ed", P_BOOL|P_VI_DEF,
979 (char_u *)&p_ed, PV_NONE,
980 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
981 {"encoding", "enc", P_STRING|P_VI_DEF|P_RCLR,
982 #ifdef FEAT_MBYTE
983 (char_u *)&p_enc, PV_NONE,
984 {(char_u *)ENC_DFLT, (char_u *)0L}
985 #else
986 (char_u *)NULL, PV_NONE,
987 {(char_u *)0L, (char_u *)0L}
988 #endif
989 SCRIPTID_INIT},
990 {"endofline", "eol", P_BOOL|P_NO_MKRC|P_VI_DEF|P_RSTAT,
991 (char_u *)&p_eol, PV_EOL,
992 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
993 {"equalalways", "ea", P_BOOL|P_VI_DEF|P_RALL,
994 (char_u *)&p_ea, PV_NONE,
995 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
996 {"equalprg", "ep", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
997 (char_u *)&p_ep, PV_EP,
998 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
999 {"errorbells", "eb", P_BOOL|P_VI_DEF,
1000 (char_u *)&p_eb, PV_NONE,
1001 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1002 {"errorfile", "ef", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
1003 #ifdef FEAT_QUICKFIX
1004 (char_u *)&p_ef, PV_NONE,
1005 {(char_u *)DFLT_ERRORFILE, (char_u *)0L}
1006 #else
1007 (char_u *)NULL, PV_NONE,
1008 {(char_u *)NULL, (char_u *)0L}
1009 #endif
1010 SCRIPTID_INIT},
1011 {"errorformat", "efm", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1012 #ifdef FEAT_QUICKFIX
1013 (char_u *)&p_efm, PV_EFM,
1014 {(char_u *)DFLT_EFM, (char_u *)0L}
1015 #else
1016 (char_u *)NULL, PV_NONE,
1017 {(char_u *)NULL, (char_u *)0L}
1018 #endif
1019 SCRIPTID_INIT},
1020 {"esckeys", "ek", P_BOOL|P_VIM,
1021 (char_u *)&p_ek, PV_NONE,
1022 {(char_u *)FALSE, (char_u *)TRUE} SCRIPTID_INIT},
1023 {"eventignore", "ei", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1024 #ifdef FEAT_AUTOCMD
1025 (char_u *)&p_ei, PV_NONE,
1026 #else
1027 (char_u *)NULL, PV_NONE,
1028 #endif
1029 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1030 {"expandtab", "et", P_BOOL|P_VI_DEF|P_VIM,
1031 (char_u *)&p_et, PV_ET,
1032 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1033 {"exrc", "ex", P_BOOL|P_VI_DEF|P_SECURE,
1034 (char_u *)&p_exrc, PV_NONE,
1035 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1036 {"fileencoding","fenc", P_STRING|P_ALLOCED|P_VI_DEF|P_RSTAT|P_RBUF|P_NO_MKRC,
1037 #ifdef FEAT_MBYTE
1038 (char_u *)&p_fenc, PV_FENC,
1039 {(char_u *)"", (char_u *)0L}
1040 #else
1041 (char_u *)NULL, PV_NONE,
1042 {(char_u *)0L, (char_u *)0L}
1043 #endif
1044 SCRIPTID_INIT},
1045 {"fileencodings","fencs", P_STRING|P_VI_DEF|P_COMMA,
1046 #ifdef FEAT_MBYTE
1047 (char_u *)&p_fencs, PV_NONE,
1048 {(char_u *)"ucs-bom", (char_u *)0L}
1049 #else
1050 (char_u *)NULL, PV_NONE,
1051 {(char_u *)0L, (char_u *)0L}
1052 #endif
1053 SCRIPTID_INIT},
1054 {"fileformat", "ff", P_STRING|P_ALLOCED|P_VI_DEF|P_RSTAT|P_NO_MKRC,
1055 (char_u *)&p_ff, PV_FF,
1056 {(char_u *)DFLT_FF, (char_u *)0L} SCRIPTID_INIT},
1057 {"fileformats", "ffs", P_STRING|P_VIM|P_COMMA|P_NODUP,
1058 (char_u *)&p_ffs, PV_NONE,
1059 {(char_u *)DFLT_FFS_VI, (char_u *)DFLT_FFS_VIM}
1060 SCRIPTID_INIT},
1061 {"filetype", "ft", P_STRING|P_ALLOCED|P_VI_DEF|P_NOGLOB|P_NFNAME,
1062 #ifdef FEAT_AUTOCMD
1063 (char_u *)&p_ft, PV_FT,
1064 {(char_u *)"", (char_u *)0L}
1065 #else
1066 (char_u *)NULL, PV_NONE,
1067 {(char_u *)0L, (char_u *)0L}
1068 #endif
1069 SCRIPTID_INIT},
1070 {"fillchars", "fcs", P_STRING|P_VI_DEF|P_RALL|P_COMMA|P_NODUP,
1071 #if defined(FEAT_WINDOWS) || defined(FEAT_FOLDING)
1072 (char_u *)&p_fcs, PV_NONE,
1073 {(char_u *)"vert:|,fold:-", (char_u *)0L}
1074 #else
1075 (char_u *)NULL, PV_NONE,
1076 {(char_u *)"", (char_u *)0L}
1077 #endif
1078 SCRIPTID_INIT},
1079 {"fkmap", "fk", P_BOOL|P_VI_DEF,
1080 #ifdef FEAT_FKMAP
1081 (char_u *)&p_fkmap, PV_NONE,
1082 #else
1083 (char_u *)NULL, PV_NONE,
1084 #endif
1085 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1086 {"flash", "fl", P_BOOL|P_VI_DEF,
1087 (char_u *)NULL, PV_NONE,
1088 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1089 #ifdef FEAT_FOLDING
1090 {"foldclose", "fcl", P_STRING|P_VI_DEF|P_COMMA|P_NODUP|P_RWIN,
1091 (char_u *)&p_fcl, PV_NONE,
1092 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1093 {"foldcolumn", "fdc", P_NUM|P_VI_DEF|P_RWIN,
1094 (char_u *)VAR_WIN, PV_FDC,
1095 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1096 {"foldenable", "fen", P_BOOL|P_VI_DEF|P_RWIN,
1097 (char_u *)VAR_WIN, PV_FEN,
1098 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
1099 {"foldexpr", "fde", P_STRING|P_ALLOCED|P_VIM|P_VI_DEF|P_RWIN,
1100 # ifdef FEAT_EVAL
1101 (char_u *)VAR_WIN, PV_FDE,
1102 {(char_u *)"0", (char_u *)NULL}
1103 # else
1104 (char_u *)NULL, PV_NONE,
1105 {(char_u *)NULL, (char_u *)0L}
1106 # endif
1107 SCRIPTID_INIT},
1108 {"foldignore", "fdi", P_STRING|P_ALLOCED|P_VIM|P_VI_DEF|P_RWIN,
1109 (char_u *)VAR_WIN, PV_FDI,
1110 {(char_u *)"#", (char_u *)NULL} SCRIPTID_INIT},
1111 {"foldlevel", "fdl", P_NUM|P_VI_DEF|P_RWIN,
1112 (char_u *)VAR_WIN, PV_FDL,
1113 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
1114 {"foldlevelstart","fdls", P_NUM|P_VI_DEF,
1115 (char_u *)&p_fdls, PV_NONE,
1116 {(char_u *)-1L, (char_u *)0L} SCRIPTID_INIT},
1117 {"foldmarker", "fmr", P_STRING|P_ALLOCED|P_VIM|P_VI_DEF|
1118 P_RWIN|P_COMMA|P_NODUP,
1119 (char_u *)VAR_WIN, PV_FMR,
1120 {(char_u *)"{{{,}}}", (char_u *)NULL}
1121 SCRIPTID_INIT},
1122 {"foldmethod", "fdm", P_STRING|P_ALLOCED|P_VIM|P_VI_DEF|P_RWIN,
1123 (char_u *)VAR_WIN, PV_FDM,
1124 {(char_u *)"manual", (char_u *)NULL} SCRIPTID_INIT},
1125 {"foldminlines","fml", P_NUM|P_VI_DEF|P_RWIN,
1126 (char_u *)VAR_WIN, PV_FML,
1127 {(char_u *)1L, (char_u *)0L} SCRIPTID_INIT},
1128 {"foldnestmax", "fdn", P_NUM|P_VI_DEF|P_RWIN,
1129 (char_u *)VAR_WIN, PV_FDN,
1130 {(char_u *)20L, (char_u *)0L} SCRIPTID_INIT},
1131 {"foldopen", "fdo", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1132 (char_u *)&p_fdo, PV_NONE,
1133 {(char_u *)"block,hor,mark,percent,quickfix,search,tag,undo",
1134 (char_u *)0L} SCRIPTID_INIT},
1135 {"foldtext", "fdt", P_STRING|P_ALLOCED|P_VIM|P_VI_DEF|P_RWIN,
1136 # ifdef FEAT_EVAL
1137 (char_u *)VAR_WIN, PV_FDT,
1138 {(char_u *)"foldtext()", (char_u *)NULL}
1139 # else
1140 (char_u *)NULL, PV_NONE,
1141 {(char_u *)NULL, (char_u *)0L}
1142 # endif
1143 SCRIPTID_INIT},
1144 #endif
1145 {"formatexpr", "fex", P_STRING|P_ALLOCED|P_VI_DEF|P_VIM,
1146 #ifdef FEAT_EVAL
1147 (char_u *)&p_fex, PV_FEX,
1148 {(char_u *)"", (char_u *)0L}
1149 #else
1150 (char_u *)NULL, PV_NONE,
1151 {(char_u *)0L, (char_u *)0L}
1152 #endif
1153 SCRIPTID_INIT},
1154 {"formatoptions","fo", P_STRING|P_ALLOCED|P_VIM|P_FLAGLIST,
1155 (char_u *)&p_fo, PV_FO,
1156 {(char_u *)DFLT_FO_VI, (char_u *)DFLT_FO_VIM}
1157 SCRIPTID_INIT},
1158 {"formatlistpat","flp", P_STRING|P_ALLOCED|P_VI_DEF,
1159 (char_u *)&p_flp, PV_FLP,
1160 {(char_u *)"^\\s*\\d\\+[\\]:.)}\\t ]\\s*",
1161 (char_u *)0L} SCRIPTID_INIT},
1162 {"formatprg", "fp", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
1163 (char_u *)&p_fp, PV_NONE,
1164 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1165 {"fsync", "fs", P_BOOL|P_SECURE|P_VI_DEF,
1166 #ifdef HAVE_FSYNC
1167 (char_u *)&p_fs, PV_NONE,
1168 {(char_u *)TRUE, (char_u *)0L}
1169 #else
1170 (char_u *)NULL, PV_NONE,
1171 {(char_u *)FALSE, (char_u *)0L}
1172 #endif
1173 SCRIPTID_INIT},
1174 {"fullscreen", "fu", P_BOOL|P_NO_MKRC,
1175 #ifdef FEAT_FULLSCREEN
1176 (char_u *)&p_fullscreen, PV_NONE,
1177 #else
1178 (char_u *)NULL, PV_NONE,
1179 #endif
1180 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1181 {"fuoptions", "fuopt", P_STRING|P_COMMA|P_NODUP|P_VI_DEF,
1182 #ifdef FEAT_FULLSCREEN
1183 (char_u *)&p_fuoptions, PV_NONE,
1184 {(char_u *)"maxvert", (char_u *)0L}
1185 #else
1186 (char_u *)NULL, PV_NONE,
1187 {(char_u *)NULL, (char_u *)0L}
1188 #endif
1189 SCRIPTID_INIT},
1190 {"gdefault", "gd", P_BOOL|P_VI_DEF|P_VIM,
1191 (char_u *)&p_gd, PV_NONE,
1192 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1193 {"graphic", "gr", P_BOOL|P_VI_DEF,
1194 (char_u *)NULL, PV_NONE,
1195 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1196 {"grepformat", "gfm", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1197 #ifdef FEAT_QUICKFIX
1198 (char_u *)&p_gefm, PV_NONE,
1199 {(char_u *)DFLT_GREPFORMAT, (char_u *)0L}
1200 #else
1201 (char_u *)NULL, PV_NONE,
1202 {(char_u *)NULL, (char_u *)0L}
1203 #endif
1204 SCRIPTID_INIT},
1205 {"grepprg", "gp", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
1206 #ifdef FEAT_QUICKFIX
1207 (char_u *)&p_gp, PV_GP,
1208 {
1209 # ifdef WIN3264
1210 /* may be changed to "grep -n" in os_win32.c */
1211 (char_u *)"findstr /n",
1212 # else
1213 # ifdef UNIX
1214 /* Add an extra file name so that grep will always
1215 * insert a file name in the match line. */
1216 (char_u *)"grep -n $* /dev/null",
1217 # else
1218 # ifdef VMS
1219 (char_u *)"SEARCH/NUMBERS ",
1220 # else
1221 (char_u *)"grep -n ",
1222 # endif
1223 # endif
1224 # endif
1225 (char_u *)0L}
1226 #else
1227 (char_u *)NULL, PV_NONE,
1228 {(char_u *)NULL, (char_u *)0L}
1229 #endif
1230 SCRIPTID_INIT},
1231 {"guicursor", "gcr", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1232 #ifdef CURSOR_SHAPE
1233 (char_u *)&p_guicursor, PV_NONE,
1234 {
1235 # ifdef FEAT_GUI
1236 (char_u *)"n-v-c:block-Cursor/lCursor,ve:ver35-Cursor,o:hor50-Cursor,i-ci:ver25-Cursor/lCursor,r-cr:hor20-Cursor/lCursor,sm:block-Cursor-blinkwait175-blinkoff150-blinkon175",
1237 # else /* MSDOS or Win32 console */
1238 (char_u *)"n-v-c:block,o:hor50,i-ci:hor15,r-cr:hor30,sm:block",
1239 # endif
1240 (char_u *)0L}
1241 #else
1242 (char_u *)NULL, PV_NONE,
1243 {(char_u *)NULL, (char_u *)0L}
1244 #endif
1245 SCRIPTID_INIT},
1246 {"guifont", "gfn", P_STRING|P_VI_DEF|P_RCLR|P_COMMA|P_NODUP,
1247 #ifdef FEAT_GUI
1248 (char_u *)&p_guifont, PV_NONE,
1249 {(char_u *)"", (char_u *)0L}
1250 #else
1251 (char_u *)NULL, PV_NONE,
1252 {(char_u *)NULL, (char_u *)0L}
1253 #endif
1254 SCRIPTID_INIT},
1255 {"guifontset", "gfs", P_STRING|P_VI_DEF|P_RCLR|P_COMMA,
1256 #if defined(FEAT_GUI) && defined(FEAT_XFONTSET)
1257 (char_u *)&p_guifontset, PV_NONE,
1258 {(char_u *)"", (char_u *)0L}
1259 #else
1260 (char_u *)NULL, PV_NONE,
1261 {(char_u *)NULL, (char_u *)0L}
1262 #endif
1263 SCRIPTID_INIT},
1264 {"guifontwide", "gfw", P_STRING|P_VI_DEF|P_RCLR|P_COMMA|P_NODUP,
1265 #if defined(FEAT_GUI) && defined(FEAT_MBYTE)
1266 (char_u *)&p_guifontwide, PV_NONE,
1267 {(char_u *)"", (char_u *)0L}
1268 #else
1269 (char_u *)NULL, PV_NONE,
1270 {(char_u *)NULL, (char_u *)0L}
1271 #endif
1272 SCRIPTID_INIT},
1273 {"guiheadroom", "ghr", P_NUM|P_VI_DEF,
1274 #if defined(FEAT_GUI_GTK) || defined(FEAT_GUI_X11)
1275 (char_u *)&p_ghr, PV_NONE,
1276 #else
1277 (char_u *)NULL, PV_NONE,
1278 #endif
1279 {(char_u *)50L, (char_u *)0L} SCRIPTID_INIT},
1280 {"guioptions", "go", P_STRING|P_VI_DEF|P_RALL|P_FLAGLIST,
1281 #if defined(FEAT_GUI)
1282 (char_u *)&p_go, PV_NONE,
1283 # if defined(UNIX) && !defined(MACOS)
1284 {(char_u *)"aegimrLtT", (char_u *)0L}
1285 # else
1286 {(char_u *)"egmrLtT", (char_u *)0L}
1287 # endif
1288 #else
1289 (char_u *)NULL, PV_NONE,
1290 {(char_u *)NULL, (char_u *)0L}
1291 #endif
1292 SCRIPTID_INIT},
1293 {"guipty", NULL, P_BOOL|P_VI_DEF,
1294 #if defined(FEAT_GUI)
1295 (char_u *)&p_guipty, PV_NONE,
1296 #else
1297 (char_u *)NULL, PV_NONE,
1298 #endif
1299 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
1300 {"guitablabel", "gtl", P_STRING|P_VI_DEF|P_RWIN,
1301 #if defined(FEAT_GUI_TABLINE)
1302 (char_u *)&p_gtl, PV_NONE,
1303 {(char_u *)"", (char_u *)0L}
1304 #else
1305 (char_u *)NULL, PV_NONE,
1306 {(char_u *)NULL, (char_u *)0L}
1307 #endif
1308 SCRIPTID_INIT},
1309 {"guitabtooltip", "gtt", P_STRING|P_VI_DEF|P_RWIN,
1310 #if defined(FEAT_GUI_TABLINE)
1311 (char_u *)&p_gtt, PV_NONE,
1312 {(char_u *)"", (char_u *)0L}
1313 #else
1314 (char_u *)NULL, PV_NONE,
1315 {(char_u *)NULL, (char_u *)0L}
1316 #endif
1317 SCRIPTID_INIT},
1318 {"hardtabs", "ht", P_NUM|P_VI_DEF,
1319 (char_u *)NULL, PV_NONE,
1320 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
1321 {"helpfile", "hf", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
1322 (char_u *)&p_hf, PV_NONE,
1323 {(char_u *)DFLT_HELPFILE, (char_u *)0L}
1324 SCRIPTID_INIT},
1325 {"helpheight", "hh", P_NUM|P_VI_DEF,
1326 #ifdef FEAT_WINDOWS
1327 (char_u *)&p_hh, PV_NONE,
1328 #else
1329 (char_u *)NULL, PV_NONE,
1330 #endif
1331 {(char_u *)20L, (char_u *)0L} SCRIPTID_INIT},
1332 {"helplang", "hlg", P_STRING|P_VI_DEF|P_COMMA,
1333 #ifdef FEAT_MULTI_LANG
1334 (char_u *)&p_hlg, PV_NONE,
1335 {(char_u *)"", (char_u *)0L}
1336 #else
1337 (char_u *)NULL, PV_NONE,
1338 {(char_u *)0L, (char_u *)0L}
1339 #endif
1340 SCRIPTID_INIT},
1341 {"hidden", "hid", P_BOOL|P_VI_DEF,
1342 (char_u *)&p_hid, PV_NONE,
1343 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1344 {"highlight", "hl", P_STRING|P_VI_DEF|P_RCLR|P_COMMA|P_NODUP,
1345 (char_u *)&p_hl, PV_NONE,
1346 {(char_u *)HIGHLIGHT_INIT, (char_u *)0L}
1347 SCRIPTID_INIT},
1348 {"history", "hi", P_NUM|P_VIM,
1349 (char_u *)&p_hi, PV_NONE,
1350 {(char_u *)0L, (char_u *)20L} SCRIPTID_INIT},
1351 {"hkmap", "hk", P_BOOL|P_VI_DEF|P_VIM,
1352 #ifdef FEAT_RIGHTLEFT
1353 (char_u *)&p_hkmap, PV_NONE,
1354 #else
1355 (char_u *)NULL, PV_NONE,
1356 #endif
1357 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1358 {"hkmapp", "hkp", P_BOOL|P_VI_DEF|P_VIM,
1359 #ifdef FEAT_RIGHTLEFT
1360 (char_u *)&p_hkmapp, PV_NONE,
1361 #else
1362 (char_u *)NULL, PV_NONE,
1363 #endif
1364 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1365 {"hlsearch", "hls", P_BOOL|P_VI_DEF|P_VIM|P_RALL,
1366 (char_u *)&p_hls, PV_NONE,
1367 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1368 {"icon", NULL, P_BOOL|P_VI_DEF,
1369 #ifdef FEAT_TITLE
1370 (char_u *)&p_icon, PV_NONE,
1371 #else
1372 (char_u *)NULL, PV_NONE,
1373 #endif
1374 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1375 {"iconstring", NULL, P_STRING|P_VI_DEF,
1376 #ifdef FEAT_TITLE
1377 (char_u *)&p_iconstring, PV_NONE,
1378 #else
1379 (char_u *)NULL, PV_NONE,
1380 #endif
1381 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1382 {"ignorecase", "ic", P_BOOL|P_VI_DEF,
1383 (char_u *)&p_ic, PV_NONE,
1384 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1385 {"imactivatekey","imak",P_STRING|P_VI_DEF,
1386 #if defined(FEAT_XIM) && defined(FEAT_GUI_GTK)
1387 (char_u *)&p_imak, PV_NONE,
1388 #else
1389 (char_u *)NULL, PV_NONE,
1390 #endif
1391 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1392 {"imcmdline", "imc", P_BOOL|P_VI_DEF,
1393 #ifdef USE_IM_CONTROL
1394 (char_u *)&p_imcmdline, PV_NONE,
1395 #else
1396 (char_u *)NULL, PV_NONE,
1397 #endif
1398 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1399 {"imdisable", "imd", P_BOOL|P_VI_DEF,
1400 #ifdef USE_IM_CONTROL
1401 (char_u *)&p_imdisable, PV_NONE,
1402 #else
1403 (char_u *)NULL, PV_NONE,
1404 #endif
1405 #if defined(__sgi) || defined(FEAT_GUI_MACVIM)
1406 {(char_u *)TRUE, (char_u *)0L}
1407 #else
1408 {(char_u *)FALSE, (char_u *)0L}
1409 #endif
1410 SCRIPTID_INIT},
1411 {"iminsert", "imi", P_NUM|P_VI_DEF,
1412 (char_u *)&p_iminsert, PV_IMI,
1413 #ifdef B_IMODE_IM
1414 {(char_u *)B_IMODE_IM, (char_u *)0L}
1415 #else
1416 {(char_u *)B_IMODE_NONE, (char_u *)0L}
1417 #endif
1418 SCRIPTID_INIT},
1419 {"imsearch", "ims", P_NUM|P_VI_DEF,
1420 (char_u *)&p_imsearch, PV_IMS,
1421 #ifdef B_IMODE_IM
1422 {(char_u *)B_IMODE_IM, (char_u *)0L}
1423 #else
1424 {(char_u *)B_IMODE_NONE, (char_u *)0L}
1425 #endif
1426 SCRIPTID_INIT},
1427 {"include", "inc", P_STRING|P_ALLOCED|P_VI_DEF,
1428 #ifdef FEAT_FIND_ID
1429 (char_u *)&p_inc, PV_INC,
1430 {(char_u *)"^\\s*#\\s*include", (char_u *)0L}
1431 #else
1432 (char_u *)NULL, PV_NONE,
1433 {(char_u *)0L, (char_u *)0L}
1434 #endif
1435 SCRIPTID_INIT},
1436 {"includeexpr", "inex", P_STRING|P_ALLOCED|P_VI_DEF,
1437 #if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
1438 (char_u *)&p_inex, PV_INEX,
1439 {(char_u *)"", (char_u *)0L}
1440 #else
1441 (char_u *)NULL, PV_NONE,
1442 {(char_u *)0L, (char_u *)0L}
1443 #endif
1444 SCRIPTID_INIT},
1445 {"incsearch", "is", P_BOOL|P_VI_DEF|P_VIM,
1446 (char_u *)&p_is, PV_NONE,
1447 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1448 {"indentexpr", "inde", P_STRING|P_ALLOCED|P_VI_DEF|P_VIM,
1449 #if defined(FEAT_CINDENT) && defined(FEAT_EVAL)
1450 (char_u *)&p_inde, PV_INDE,
1451 {(char_u *)"", (char_u *)0L}
1452 #else
1453 (char_u *)NULL, PV_NONE,
1454 {(char_u *)0L, (char_u *)0L}
1455 #endif
1456 SCRIPTID_INIT},
1457 {"indentkeys", "indk", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_NODUP,
1458 #if defined(FEAT_CINDENT) && defined(FEAT_EVAL)
1459 (char_u *)&p_indk, PV_INDK,
1460 {(char_u *)"0{,0},:,0#,!^F,o,O,e", (char_u *)0L}
1461 #else
1462 (char_u *)NULL, PV_NONE,
1463 {(char_u *)0L, (char_u *)0L}
1464 #endif
1465 SCRIPTID_INIT},
1466 {"infercase", "inf", P_BOOL|P_VI_DEF,
1467 (char_u *)&p_inf, PV_INF,
1468 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1469 {"insertmode", "im", P_BOOL|P_VI_DEF|P_VIM,
1470 (char_u *)&p_im, PV_NONE,
1471 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1472 {"isfname", "isf", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1473 (char_u *)&p_isf, PV_NONE,
1474 {
1475 #ifdef BACKSLASH_IN_FILENAME
1476 /* Excluded are: & and ^ are special in cmd.exe
1477 * ( and ) are used in text separating fnames */
1478 (char_u *)"@,48-57,/,\\,.,-,_,+,,,#,$,%,{,},[,],:,@-@,!,~,=",
1479 #else
1480 # ifdef AMIGA
1481 (char_u *)"@,48-57,/,.,-,_,+,,,$,:",
1482 # else
1483 # ifdef VMS
1484 (char_u *)"@,48-57,/,.,-,_,+,,,#,$,%,<,>,[,],:,;,~",
1485 # else /* UNIX et al. */
1486 # ifdef EBCDIC
1487 (char_u *)"@,240-249,/,.,-,_,+,,,#,$,%,~,=",
1488 # else
1489 (char_u *)"@,48-57,/,.,-,_,+,,,#,$,%,~,=",
1490 # endif
1491 # endif
1492 # endif
1493 #endif
1494 (char_u *)0L} SCRIPTID_INIT},
1495 {"isident", "isi", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1496 (char_u *)&p_isi, PV_NONE,
1497 {
1498 #if defined(MSDOS) || defined(MSWIN) || defined(OS2)
1499 (char_u *)"@,48-57,_,128-167,224-235",
1500 #else
1501 # ifdef EBCDIC
1502 /* TODO: EBCDIC Check this! @ == isalpha()*/
1503 (char_u *)"@,240-249,_,66-73,81-89,98-105,"
1504 "112-120,128,140-142,156,158,172,"
1505 "174,186,191,203-207,219-225,235-239,"
1506 "251-254",
1507 # else
1508 (char_u *)"@,48-57,_,192-255",
1509 # endif
1510 #endif
1511 (char_u *)0L} SCRIPTID_INIT},
1512 {"iskeyword", "isk", P_STRING|P_ALLOCED|P_VIM|P_COMMA|P_NODUP,
1513 (char_u *)&p_isk, PV_ISK,
1514 {
1515 #ifdef EBCDIC
1516 (char_u *)"@,240-249,_",
1517 /* TODO: EBCDIC Check this! @ == isalpha()*/
1518 (char_u *)"@,240-249,_,66-73,81-89,98-105,"
1519 "112-120,128,140-142,156,158,172,"
1520 "174,186,191,203-207,219-225,235-239,"
1521 "251-254",
1522 #else
1523 (char_u *)"@,48-57,_",
1524 # if defined(MSDOS) || defined(MSWIN) || defined(OS2)
1525 (char_u *)"@,48-57,_,128-167,224-235"
1526 # else
1527 ISK_LATIN1
1528 # endif
1529 #endif
1530 } SCRIPTID_INIT},
1531 {"isprint", "isp", P_STRING|P_VI_DEF|P_RALL|P_COMMA|P_NODUP,
1532 (char_u *)&p_isp, PV_NONE,
1533 {
1534 #if defined(MSDOS) || defined(MSWIN) || defined(OS2) \
1535 || (defined(MACOS) && !defined(MACOS_X)) \
1536 || defined(VMS)
1537 (char_u *)"@,~-255",
1538 #else
1539 # ifdef EBCDIC
1540 /* all chars above 63 are printable */
1541 (char_u *)"63-255",
1542 # else
1543 ISP_LATIN1,
1544 # endif
1545 #endif
1546 (char_u *)0L} SCRIPTID_INIT},
1547 {"joinspaces", "js", P_BOOL|P_VI_DEF|P_VIM,
1548 (char_u *)&p_js, PV_NONE,
1549 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
1550 {"key", NULL, P_STRING|P_ALLOCED|P_VI_DEF|P_NO_MKRC,
1551 #ifdef FEAT_CRYPT
1552 (char_u *)&p_key, PV_KEY,
1553 {(char_u *)"", (char_u *)0L}
1554 #else
1555 (char_u *)NULL, PV_NONE,
1556 {(char_u *)0L, (char_u *)0L}
1557 #endif
1558 SCRIPTID_INIT},
1559 {"keymap", "kmp", P_STRING|P_ALLOCED|P_VI_DEF|P_RBUF|P_RSTAT|P_NFNAME|P_PRI_MKRC,
1560 #ifdef FEAT_KEYMAP
1561 (char_u *)&p_keymap, PV_KMAP,
1562 {(char_u *)"", (char_u *)0L}
1563 #else
1564 (char_u *)NULL, PV_NONE,
1565 {(char_u *)"", (char_u *)0L}
1566 #endif
1567 SCRIPTID_INIT},
1568 {"keymodel", "km", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1569 #ifdef FEAT_VISUAL
1570 (char_u *)&p_km, PV_NONE,
1571 #else
1572 (char_u *)NULL, PV_NONE,
1573 #endif
1574 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1575 {"keywordprg", "kp", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
1576 (char_u *)&p_kp, PV_KP,
1577 {
1578 #if defined(MSDOS) || defined(MSWIN)
1579 (char_u *)":help",
1580 #else
1581 #ifdef VMS
1582 (char_u *)"help",
1583 #else
1584 # if defined(OS2)
1585 (char_u *)"view /",
1586 # else
1587 # ifdef USEMAN_S
1588 (char_u *)"man -s",
1589 # else
1590 (char_u *)"man",
1591 # endif
1592 # endif
1593 #endif
1594 #endif
1595 (char_u *)0L} SCRIPTID_INIT},
1596 {"langmap", "lmap", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1597 #ifdef FEAT_LANGMAP
1598 (char_u *)&p_langmap, PV_NONE,
1599 {(char_u *)"", /* unmatched } */
1600 #else
1601 (char_u *)NULL, PV_NONE,
1602 {(char_u *)NULL,
1603 #endif
1604 (char_u *)0L} SCRIPTID_INIT},
1605 {"langmenu", "lm", P_STRING|P_VI_DEF|P_NFNAME,
1606 #if defined(FEAT_MENU) && defined(FEAT_MULTI_LANG)
1607 (char_u *)&p_lm, PV_NONE,
1608 #else
1609 (char_u *)NULL, PV_NONE,
1610 #endif
1611 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1612 {"laststatus", "ls", P_NUM|P_VI_DEF|P_RALL,
1613 #ifdef FEAT_WINDOWS
1614 (char_u *)&p_ls, PV_NONE,
1615 #else
1616 (char_u *)NULL, PV_NONE,
1617 #endif
1618 {(char_u *)1L, (char_u *)0L} SCRIPTID_INIT},
1619 {"lazyredraw", "lz", P_BOOL|P_VI_DEF,
1620 (char_u *)&p_lz, PV_NONE,
1621 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1622 {"linebreak", "lbr", P_BOOL|P_VI_DEF|P_RWIN,
1623 #ifdef FEAT_LINEBREAK
1624 (char_u *)VAR_WIN, PV_LBR,
1625 #else
1626 (char_u *)NULL, PV_NONE,
1627 #endif
1628 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1629 {"lines", NULL, P_NUM|P_NODEFAULT|P_NO_MKRC|P_VI_DEF|P_RCLR,
1630 (char_u *)&Rows, PV_NONE,
1631 {
1632 #if defined(MSDOS) || defined(WIN3264) || defined(OS2)
1633 (char_u *)25L,
1634 #else
1635 (char_u *)24L,
1636 #endif
1637 (char_u *)0L} SCRIPTID_INIT},
1638 {"linespace", "lsp", P_NUM|P_VI_DEF|P_RCLR,
1639 #ifdef FEAT_GUI
1640 (char_u *)&p_linespace, PV_NONE,
1641 #else
1642 (char_u *)NULL, PV_NONE,
1643 #endif
1644 #ifdef FEAT_GUI_W32
1645 {(char_u *)1L, (char_u *)0L}
1646 #else
1647 {(char_u *)0L, (char_u *)0L}
1648 #endif
1649 SCRIPTID_INIT},
1650 {"lisp", NULL, P_BOOL|P_VI_DEF,
1651 #ifdef FEAT_LISP
1652 (char_u *)&p_lisp, PV_LISP,
1653 #else
1654 (char_u *)NULL, PV_NONE,
1655 #endif
1656 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1657 {"lispwords", "lw", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1658 #ifdef FEAT_LISP
1659 (char_u *)&p_lispwords, PV_NONE,
1660 {(char_u *)LISPWORD_VALUE, (char_u *)0L}
1661 #else
1662 (char_u *)NULL, PV_NONE,
1663 {(char_u *)"", (char_u *)0L}
1664 #endif
1665 SCRIPTID_INIT},
1666 {"list", NULL, P_BOOL|P_VI_DEF|P_RWIN,
1667 (char_u *)VAR_WIN, PV_LIST,
1668 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1669 {"listchars", "lcs", P_STRING|P_VI_DEF|P_RALL|P_COMMA|P_NODUP,
1670 (char_u *)&p_lcs, PV_NONE,
1671 {(char_u *)"eol:$", (char_u *)0L} SCRIPTID_INIT},
1672 {"loadplugins", "lpl", P_BOOL|P_VI_DEF,
1673 (char_u *)&p_lpl, PV_NONE,
1674 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
1675 #ifdef FEAT_GUI_MAC
1676 {"macatsui", NULL, P_BOOL|P_VI_DEF|P_RCLR,
1677 (char_u *)&p_macatsui, PV_NONE,
1678 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
1679 #endif
1680 {"macmeta", "mmta", P_BOOL|P_VI_DEF,
1681 #ifdef FEAT_GUI_MACVIM
1682 (char_u *)&p_mmta, PV_MMTA,
1683 #else
1684 (char_u *)NULL, PV_NONE,
1685 #endif
1686 {(char_u *)FALSE, (char_u *)0L}},
1687 {"magic", NULL, P_BOOL|P_VI_DEF,
1688 (char_u *)&p_magic, PV_NONE,
1689 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
1690 {"makeef", "mef", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
1691 #ifdef FEAT_QUICKFIX
1692 (char_u *)&p_mef, PV_NONE,
1693 {(char_u *)"", (char_u *)0L}
1694 #else
1695 (char_u *)NULL, PV_NONE,
1696 {(char_u *)NULL, (char_u *)0L}
1697 #endif
1698 SCRIPTID_INIT},
1699 {"makeprg", "mp", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
1700 #ifdef FEAT_QUICKFIX
1701 (char_u *)&p_mp, PV_MP,
1702 # ifdef VMS
1703 {(char_u *)"MMS", (char_u *)0L}
1704 # else
1705 {(char_u *)"make", (char_u *)0L}
1706 # endif
1707 #else
1708 (char_u *)NULL, PV_NONE,
1709 {(char_u *)NULL, (char_u *)0L}
1710 #endif
1711 SCRIPTID_INIT},
1712 {"matchpairs", "mps", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_NODUP,
1713 (char_u *)&p_mps, PV_MPS,
1714 {(char_u *)"(:),{:},[:]", (char_u *)0L}
1715 SCRIPTID_INIT},
1716 {"matchtime", "mat", P_NUM|P_VI_DEF,
1717 (char_u *)&p_mat, PV_NONE,
1718 {(char_u *)5L, (char_u *)0L} SCRIPTID_INIT},
1719 {"maxcombine", "mco", P_NUM|P_VI_DEF,
1720 #ifdef FEAT_MBYTE
1721 (char_u *)&p_mco, PV_NONE,
1722 #else
1723 (char_u *)NULL, PV_NONE,
1724 #endif
1725 {(char_u *)2, (char_u *)0L} SCRIPTID_INIT},
1726 {"maxfuncdepth", "mfd", P_NUM|P_VI_DEF,
1727 #ifdef FEAT_EVAL
1728 (char_u *)&p_mfd, PV_NONE,
1729 #else
1730 (char_u *)NULL, PV_NONE,
1731 #endif
1732 {(char_u *)100L, (char_u *)0L} SCRIPTID_INIT},
1733 {"maxmapdepth", "mmd", P_NUM|P_VI_DEF,
1734 (char_u *)&p_mmd, PV_NONE,
1735 {(char_u *)1000L, (char_u *)0L} SCRIPTID_INIT},
1736 {"maxmem", "mm", P_NUM|P_VI_DEF,
1737 (char_u *)&p_mm, PV_NONE,
1738 {(char_u *)DFLT_MAXMEM, (char_u *)0L}
1739 SCRIPTID_INIT},
1740 {"maxmempattern","mmp", P_NUM|P_VI_DEF,
1741 (char_u *)&p_mmp, PV_NONE,
1742 {(char_u *)1000L, (char_u *)0L} SCRIPTID_INIT},
1743 {"maxmemtot", "mmt", P_NUM|P_VI_DEF,
1744 (char_u *)&p_mmt, PV_NONE,
1745 {(char_u *)DFLT_MAXMEMTOT, (char_u *)0L}
1746 SCRIPTID_INIT},
1747 {"menuitems", "mis", P_NUM|P_VI_DEF,
1748 #ifdef FEAT_MENU
1749 (char_u *)&p_mis, PV_NONE,
1750 #else
1751 (char_u *)NULL, PV_NONE,
1752 #endif
1753 {(char_u *)25L, (char_u *)0L} SCRIPTID_INIT},
1754 {"mesg", NULL, P_BOOL|P_VI_DEF,
1755 (char_u *)NULL, PV_NONE,
1756 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1757 {"mkspellmem", "msm", P_STRING|P_VI_DEF|P_EXPAND|P_SECURE,
1758 #ifdef FEAT_SPELL
1759 (char_u *)&p_msm, PV_NONE,
1760 {(char_u *)"460000,2000,500", (char_u *)0L}
1761 #else
1762 (char_u *)NULL, PV_NONE,
1763 {(char_u *)0L, (char_u *)0L}
1764 #endif
1765 SCRIPTID_INIT},
1766 {"modeline", "ml", P_BOOL|P_VIM,
1767 (char_u *)&p_ml, PV_ML,
1768 {(char_u *)FALSE, (char_u *)TRUE} SCRIPTID_INIT},
1769 {"modelines", "mls", P_NUM|P_VI_DEF,
1770 (char_u *)&p_mls, PV_NONE,
1771 {(char_u *)5L, (char_u *)0L} SCRIPTID_INIT},
1772 {"modifiable", "ma", P_BOOL|P_VI_DEF|P_NOGLOB,
1773 (char_u *)&p_ma, PV_MA,
1774 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
1775 {"modified", "mod", P_BOOL|P_NO_MKRC|P_VI_DEF|P_RSTAT,
1776 (char_u *)&p_mod, PV_MOD,
1777 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1778 {"more", NULL, P_BOOL|P_VIM,
1779 (char_u *)&p_more, PV_NONE,
1780 {(char_u *)FALSE, (char_u *)TRUE} SCRIPTID_INIT},
1781 {"mouse", NULL, P_STRING|P_VI_DEF|P_FLAGLIST,
1782 (char_u *)&p_mouse, PV_NONE,
1783 {
1784 #if defined(MSDOS) || defined(WIN3264)
1785 (char_u *)"a",
1786 #else
1787 (char_u *)"",
1788 #endif
1789 (char_u *)0L} SCRIPTID_INIT},
1790 {"mousefocus", "mousef", P_BOOL|P_VI_DEF,
1791 #ifdef FEAT_GUI
1792 (char_u *)&p_mousef, PV_NONE,
1793 #else
1794 (char_u *)NULL, PV_NONE,
1795 #endif
1796 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1797 {"mousehide", "mh", P_BOOL|P_VI_DEF,
1798 #ifdef FEAT_GUI
1799 (char_u *)&p_mh, PV_NONE,
1800 #else
1801 (char_u *)NULL, PV_NONE,
1802 #endif
1803 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
1804 {"mousemodel", "mousem", P_STRING|P_VI_DEF,
1805 (char_u *)&p_mousem, PV_NONE,
1806 {
1807 #if defined(MSDOS) || defined(MSWIN)
1808 (char_u *)"popup",
1809 #else
1810 # if defined(MACOS)
1811 (char_u *)"popup_setpos",
1812 # else
1813 (char_u *)"extend",
1814 # endif
1815 #endif
1816 (char_u *)0L} SCRIPTID_INIT},
1817 {"mouseshape", "mouses", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
1818 #ifdef FEAT_MOUSESHAPE
1819 (char_u *)&p_mouseshape, PV_NONE,
1820 {(char_u *)"i-r:beam,s:updown,sd:udsizing,vs:leftright,vd:lrsizing,m:no,ml:up-arrow,v:rightup-arrow", (char_u *)0L}
1821 #else
1822 (char_u *)NULL, PV_NONE,
1823 {(char_u *)NULL, (char_u *)0L}
1824 #endif
1825 SCRIPTID_INIT},
1826 {"mousetime", "mouset", P_NUM|P_VI_DEF,
1827 (char_u *)&p_mouset, PV_NONE,
1828 {(char_u *)500L, (char_u *)0L} SCRIPTID_INIT},
1829 {"mzquantum", "mzq", P_NUM,
1830 #ifdef FEAT_MZSCHEME
1831 (char_u *)&p_mzq, PV_NONE,
1832 #else
1833 (char_u *)NULL, PV_NONE,
1834 #endif
1835 {(char_u *)100L, (char_u *)100L} SCRIPTID_INIT},
1836 {"novice", NULL, P_BOOL|P_VI_DEF,
1837 (char_u *)NULL, PV_NONE,
1838 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1839 {"nrformats", "nf", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_NODUP,
1840 (char_u *)&p_nf, PV_NF,
1841 {(char_u *)"octal,hex", (char_u *)0L}
1842 SCRIPTID_INIT},
1843 {"number", "nu", P_BOOL|P_VI_DEF|P_RWIN,
1844 (char_u *)VAR_WIN, PV_NU,
1845 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1846 {"numberwidth", "nuw", P_NUM|P_RWIN|P_VIM,
1847 #ifdef FEAT_LINEBREAK
1848 (char_u *)VAR_WIN, PV_NUW,
1849 #else
1850 (char_u *)NULL, PV_NONE,
1851 #endif
1852 {(char_u *)8L, (char_u *)4L} SCRIPTID_INIT},
1853 {"omnifunc", "ofu", P_STRING|P_ALLOCED|P_VI_DEF|P_SECURE,
1854 #ifdef FEAT_COMPL_FUNC
1855 (char_u *)&p_ofu, PV_OFU,
1856 {(char_u *)"", (char_u *)0L}
1857 #else
1858 (char_u *)NULL, PV_NONE,
1859 {(char_u *)0L, (char_u *)0L}
1860 #endif
1861 SCRIPTID_INIT},
1862 {"open", NULL, P_BOOL|P_VI_DEF,
1863 (char_u *)NULL, PV_NONE,
1864 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1865 {"opendevice", "odev", P_BOOL|P_VI_DEF,
1866 #if defined(MSDOS) || defined(MSWIN) || defined(OS2)
1867 (char_u *)&p_odev, PV_NONE,
1868 #else
1869 (char_u *)NULL, PV_NONE,
1870 #endif
1871 {(char_u *)FALSE, (char_u *)FALSE}
1872 SCRIPTID_INIT},
1873 {"operatorfunc", "opfunc", P_STRING|P_VI_DEF|P_SECURE,
1874 (char_u *)&p_opfunc, PV_NONE,
1875 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1876 {"optimize", "opt", P_BOOL|P_VI_DEF,
1877 (char_u *)NULL, PV_NONE,
1878 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1879 {"osfiletype", "oft", P_STRING|P_ALLOCED|P_VI_DEF,
1880 #ifdef FEAT_OSFILETYPE
1881 (char_u *)&p_oft, PV_OFT,
1882 {(char_u *)DFLT_OFT, (char_u *)0L}
1883 #else
1884 (char_u *)NULL, PV_NONE,
1885 {(char_u *)0L, (char_u *)0L}
1886 #endif
1887 SCRIPTID_INIT},
1888 {"paragraphs", "para", P_STRING|P_VI_DEF,
1889 (char_u *)&p_para, PV_NONE,
1890 {(char_u *)"IPLPPPQPP TPHPLIPpLpItpplpipbp",
1891 (char_u *)0L} SCRIPTID_INIT},
1892 {"paste", NULL, P_BOOL|P_VI_DEF|P_PRI_MKRC,
1893 (char_u *)&p_paste, PV_NONE,
1894 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1895 {"pastetoggle", "pt", P_STRING|P_VI_DEF,
1896 (char_u *)&p_pt, PV_NONE,
1897 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1898 {"patchexpr", "pex", P_STRING|P_VI_DEF|P_SECURE,
1899 #if defined(FEAT_DIFF) && defined(FEAT_EVAL)
1900 (char_u *)&p_pex, PV_NONE,
1901 {(char_u *)"", (char_u *)0L}
1902 #else
1903 (char_u *)NULL, PV_NONE,
1904 {(char_u *)0L, (char_u *)0L}
1905 #endif
1906 SCRIPTID_INIT},
1907 {"patchmode", "pm", P_STRING|P_VI_DEF|P_NFNAME,
1908 (char_u *)&p_pm, PV_NONE,
1909 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
1910 {"path", "pa", P_STRING|P_EXPAND|P_VI_DEF|P_COMMA|P_NODUP,
1911 (char_u *)&p_path, PV_PATH,
1912 {
1913 #if defined AMIGA || defined MSDOS || defined MSWIN
1914 (char_u *)".,,",
1915 #else
1916 # if defined(__EMX__)
1917 (char_u *)".,/emx/include,,",
1918 # else /* Unix, probably */
1919 (char_u *)".,/usr/include,,",
1920 # endif
1921 #endif
1922 (char_u *)0L} SCRIPTID_INIT},
1923 {"preserveindent", "pi", P_BOOL|P_VI_DEF|P_VIM,
1924 (char_u *)&p_pi, PV_PI,
1925 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1926 {"previewheight", "pvh", P_NUM|P_VI_DEF,
1927 #if defined(FEAT_WINDOWS) && defined(FEAT_QUICKFIX)
1928 (char_u *)&p_pvh, PV_NONE,
1929 #else
1930 (char_u *)NULL, PV_NONE,
1931 #endif
1932 {(char_u *)12L, (char_u *)0L} SCRIPTID_INIT},
1933 {"previewwindow", "pvw", P_BOOL|P_VI_DEF|P_RSTAT|P_NOGLOB,
1934 #if defined(FEAT_WINDOWS) && defined(FEAT_QUICKFIX)
1935 (char_u *)VAR_WIN, PV_PVW,
1936 #else
1937 (char_u *)NULL, PV_NONE,
1938 #endif
1939 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
1940 {"printdevice", "pdev", P_STRING|P_VI_DEF|P_SECURE,
1941 #ifdef FEAT_PRINTER
1942 (char_u *)&p_pdev, PV_NONE,
1943 {(char_u *)"", (char_u *)0L}
1944 #else
1945 (char_u *)NULL, PV_NONE,
1946 {(char_u *)NULL, (char_u *)0L}
1947 #endif
1948 SCRIPTID_INIT},
1949 {"printencoding", "penc", P_STRING|P_VI_DEF,
1950 #ifdef FEAT_POSTSCRIPT
1951 (char_u *)&p_penc, PV_NONE,
1952 {(char_u *)"", (char_u *)0L}
1953 #else
1954 (char_u *)NULL, PV_NONE,
1955 {(char_u *)NULL, (char_u *)0L}
1956 #endif
1957 SCRIPTID_INIT},
1958 {"printexpr", "pexpr", P_STRING|P_VI_DEF,
1959 #ifdef FEAT_POSTSCRIPT
1960 (char_u *)&p_pexpr, PV_NONE,
1961 {(char_u *)"", (char_u *)0L}
1962 #else
1963 (char_u *)NULL, PV_NONE,
1964 {(char_u *)NULL, (char_u *)0L}
1965 #endif
1966 SCRIPTID_INIT},
1967 {"printfont", "pfn", P_STRING|P_VI_DEF,
1968 #ifdef FEAT_PRINTER
1969 (char_u *)&p_pfn, PV_NONE,
1970 {
1971 # ifdef MSWIN
1972 (char_u *)"Courier_New:h10",
1973 # else
1974 (char_u *)"courier",
1975 # endif
1976 (char_u *)0L}
1977 #else
1978 (char_u *)NULL, PV_NONE,
1979 {(char_u *)NULL, (char_u *)0L}
1980 #endif
1981 SCRIPTID_INIT},
1982 {"printheader", "pheader", P_STRING|P_VI_DEF|P_GETTEXT,
1983 #ifdef FEAT_PRINTER
1984 (char_u *)&p_header, PV_NONE,
1985 {(char_u *)N_("%<%f%h%m%=Page %N"), (char_u *)0L}
1986 #else
1987 (char_u *)NULL, PV_NONE,
1988 {(char_u *)NULL, (char_u *)0L}
1989 #endif
1990 SCRIPTID_INIT},
1991 {"printmbcharset", "pmbcs", P_STRING|P_VI_DEF,
1992 #if defined(FEAT_POSTSCRIPT) && defined(FEAT_MBYTE)
1993 (char_u *)&p_pmcs, PV_NONE,
1994 {(char_u *)"", (char_u *)0L}
1995 #else
1996 (char_u *)NULL, PV_NONE,
1997 {(char_u *)NULL, (char_u *)0L}
1998 #endif
1999 SCRIPTID_INIT},
2000 {"printmbfont", "pmbfn", P_STRING|P_VI_DEF,
2001 #if defined(FEAT_POSTSCRIPT) && defined(FEAT_MBYTE)
2002 (char_u *)&p_pmfn, PV_NONE,
2003 {(char_u *)"", (char_u *)0L}
2004 #else
2005 (char_u *)NULL, PV_NONE,
2006 {(char_u *)NULL, (char_u *)0L}
2007 #endif
2008 SCRIPTID_INIT},
2009 {"printoptions", "popt", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2010 #ifdef FEAT_PRINTER
2011 (char_u *)&p_popt, PV_NONE,
2012 {(char_u *)"", (char_u *)0L}
2013 #else
2014 (char_u *)NULL, PV_NONE,
2015 {(char_u *)NULL, (char_u *)0L}
2016 #endif
2017 SCRIPTID_INIT},
2018 {"prompt", NULL, P_BOOL|P_VI_DEF,
2019 (char_u *)&p_prompt, PV_NONE,
2020 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2021 {"pumheight", "ph", P_NUM|P_VI_DEF,
2022 #ifdef FEAT_INS_EXPAND
2023 (char_u *)&p_ph, PV_NONE,
2024 #else
2025 (char_u *)NULL, PV_NONE,
2026 #endif
2027 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2028 {"quoteescape", "qe", P_STRING|P_ALLOCED|P_VI_DEF,
2029 #ifdef FEAT_TEXTOBJ
2030 (char_u *)&p_qe, PV_QE,
2031 {(char_u *)"\\", (char_u *)0L}
2032 #else
2033 (char_u *)NULL, PV_NONE,
2034 {(char_u *)NULL, (char_u *)0L}
2035 #endif
2036 SCRIPTID_INIT},
2037 {"readonly", "ro", P_BOOL|P_VI_DEF|P_RSTAT|P_NOGLOB,
2038 (char_u *)&p_ro, PV_RO,
2039 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2040 {"redraw", NULL, P_BOOL|P_VI_DEF,
2041 (char_u *)NULL, PV_NONE,
2042 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2043 {"redrawtime", "rdt", P_NUM|P_VI_DEF,
2044 #ifdef FEAT_RELTIME
2045 (char_u *)&p_rdt, PV_NONE,
2046 #else
2047 (char_u *)NULL, PV_NONE,
2048 #endif
2049 {(char_u *)2000L, (char_u *)0L} SCRIPTID_INIT},
2050 {"remap", NULL, P_BOOL|P_VI_DEF,
2051 (char_u *)&p_remap, PV_NONE,
2052 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2053 {"report", NULL, P_NUM|P_VI_DEF,
2054 (char_u *)&p_report, PV_NONE,
2055 {(char_u *)2L, (char_u *)0L} SCRIPTID_INIT},
2056 {"restorescreen", "rs", P_BOOL|P_VI_DEF,
2057 #ifdef WIN3264
2058 (char_u *)&p_rs, PV_NONE,
2059 #else
2060 (char_u *)NULL, PV_NONE,
2061 #endif
2062 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2063 {"revins", "ri", P_BOOL|P_VI_DEF|P_VIM,
2064 #ifdef FEAT_RIGHTLEFT
2065 (char_u *)&p_ri, PV_NONE,
2066 #else
2067 (char_u *)NULL, PV_NONE,
2068 #endif
2069 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2070 {"rightleft", "rl", P_BOOL|P_VI_DEF|P_RWIN,
2071 #ifdef FEAT_RIGHTLEFT
2072 (char_u *)VAR_WIN, PV_RL,
2073 #else
2074 (char_u *)NULL, PV_NONE,
2075 #endif
2076 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2077 {"rightleftcmd", "rlc", P_STRING|P_ALLOCED|P_VI_DEF|P_RWIN,
2078 #ifdef FEAT_RIGHTLEFT
2079 (char_u *)VAR_WIN, PV_RLC,
2080 {(char_u *)"search", (char_u *)NULL}
2081 #else
2082 (char_u *)NULL, PV_NONE,
2083 {(char_u *)NULL, (char_u *)0L}
2084 #endif
2085 SCRIPTID_INIT},
2086 {"ruler", "ru", P_BOOL|P_VI_DEF|P_VIM|P_RSTAT,
2087 #ifdef FEAT_CMDL_INFO
2088 (char_u *)&p_ru, PV_NONE,
2089 #else
2090 (char_u *)NULL, PV_NONE,
2091 #endif
2092 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2093 {"rulerformat", "ruf", P_STRING|P_VI_DEF|P_ALLOCED|P_RSTAT,
2094 #ifdef FEAT_STL_OPT
2095 (char_u *)&p_ruf, PV_NONE,
2096 #else
2097 (char_u *)NULL, PV_NONE,
2098 #endif
2099 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2100 {"runtimepath", "rtp", P_STRING|P_VI_DEF|P_EXPAND|P_COMMA|P_NODUP|P_SECURE,
2101 (char_u *)&p_rtp, PV_NONE,
2102 {(char_u *)DFLT_RUNTIMEPATH, (char_u *)0L}
2103 SCRIPTID_INIT},
2104 {"scroll", "scr", P_NUM|P_NO_MKRC|P_VI_DEF,
2105 (char_u *)VAR_WIN, PV_SCROLL,
2106 {(char_u *)12L, (char_u *)0L} SCRIPTID_INIT},
2107 {"scrollbind", "scb", P_BOOL|P_VI_DEF,
2108 #ifdef FEAT_SCROLLBIND
2109 (char_u *)VAR_WIN, PV_SCBIND,
2110 #else
2111 (char_u *)NULL, PV_NONE,
2112 #endif
2113 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2114 {"scrolljump", "sj", P_NUM|P_VI_DEF|P_VIM,
2115 (char_u *)&p_sj, PV_NONE,
2116 {(char_u *)1L, (char_u *)0L} SCRIPTID_INIT},
2117 {"scrolloff", "so", P_NUM|P_VI_DEF|P_VIM|P_RALL,
2118 (char_u *)&p_so, PV_NONE,
2119 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2120 {"scrollopt", "sbo", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2121 #ifdef FEAT_SCROLLBIND
2122 (char_u *)&p_sbo, PV_NONE,
2123 {(char_u *)"ver,jump", (char_u *)0L}
2124 #else
2125 (char_u *)NULL, PV_NONE,
2126 {(char_u *)0L, (char_u *)0L}
2127 #endif
2128 SCRIPTID_INIT},
2129 {"sections", "sect", P_STRING|P_VI_DEF,
2130 (char_u *)&p_sections, PV_NONE,
2131 {(char_u *)"SHNHH HUnhsh", (char_u *)0L}
2132 SCRIPTID_INIT},
2133 {"secure", NULL, P_BOOL|P_VI_DEF|P_SECURE,
2134 (char_u *)&p_secure, PV_NONE,
2135 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2136 {"selection", "sel", P_STRING|P_VI_DEF,
2137 #ifdef FEAT_VISUAL
2138 (char_u *)&p_sel, PV_NONE,
2139 #else
2140 (char_u *)NULL, PV_NONE,
2141 #endif
2142 {(char_u *)"inclusive", (char_u *)0L}
2143 SCRIPTID_INIT},
2144 {"selectmode", "slm", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2145 #ifdef FEAT_VISUAL
2146 (char_u *)&p_slm, PV_NONE,
2147 #else
2148 (char_u *)NULL, PV_NONE,
2149 #endif
2150 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2151 {"sessionoptions", "ssop", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2152 #ifdef FEAT_SESSION
2153 (char_u *)&p_ssop, PV_NONE,
2154 {(char_u *)"blank,buffers,curdir,folds,help,options,tabpages,winsize",
2155 (char_u *)0L}
2156 #else
2157 (char_u *)NULL, PV_NONE,
2158 {(char_u *)0L, (char_u *)0L}
2159 #endif
2160 SCRIPTID_INIT},
2161 {"shell", "sh", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
2162 (char_u *)&p_sh, PV_NONE,
2163 {
2164 #ifdef VMS
2165 (char_u *)"-",
2166 #else
2167 # if defined(MSDOS)
2168 (char_u *)"command",
2169 # else
2170 # if defined(WIN16)
2171 (char_u *)"command.com",
2172 # else
2173 # if defined(WIN3264)
2174 (char_u *)"", /* set in set_init_1() */
2175 # else
2176 # if defined(OS2)
2177 (char_u *)"cmd.exe",
2178 # else
2179 # if defined(ARCHIE)
2180 (char_u *)"gos",
2181 # else
2182 (char_u *)"sh",
2183 # endif
2184 # endif
2185 # endif
2186 # endif
2187 # endif
2188 #endif /* VMS */
2189 (char_u *)0L} SCRIPTID_INIT},
2190 {"shellcmdflag","shcf", P_STRING|P_VI_DEF|P_SECURE,
2191 (char_u *)&p_shcf, PV_NONE,
2192 {
2193 #if defined(MSDOS) || defined(MSWIN)
2194 (char_u *)"/c",
2195 #else
2196 # if defined(OS2)
2197 (char_u *)"/c",
2198 # else
2199 (char_u *)"-c",
2200 # endif
2201 #endif
2202 (char_u *)0L} SCRIPTID_INIT},
2203 {"shellpipe", "sp", P_STRING|P_VI_DEF|P_SECURE,
2204 #ifdef FEAT_QUICKFIX
2205 (char_u *)&p_sp, PV_NONE,
2206 {
2207 #if defined(UNIX) || defined(OS2)
2208 # ifdef ARCHIE
2209 (char_u *)"2>",
2210 # else
2211 (char_u *)"| tee",
2212 # endif
2213 #else
2214 (char_u *)">",
2215 #endif
2216 (char_u *)0L}
2217 #else
2218 (char_u *)NULL, PV_NONE,
2219 {(char_u *)0L, (char_u *)0L}
2220 #endif
2221 SCRIPTID_INIT},
2222 {"shellquote", "shq", P_STRING|P_VI_DEF|P_SECURE,
2223 (char_u *)&p_shq, PV_NONE,
2224 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2225 {"shellredir", "srr", P_STRING|P_VI_DEF|P_SECURE,
2226 (char_u *)&p_srr, PV_NONE,
2227 {(char_u *)">", (char_u *)0L} SCRIPTID_INIT},
2228 {"shellslash", "ssl", P_BOOL|P_VI_DEF,
2229 #ifdef BACKSLASH_IN_FILENAME
2230 (char_u *)&p_ssl, PV_NONE,
2231 #else
2232 (char_u *)NULL, PV_NONE,
2233 #endif
2234 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2235 {"shelltemp", "stmp", P_BOOL,
2236 (char_u *)&p_stmp, PV_NONE,
2237 {(char_u *)FALSE, (char_u *)TRUE} SCRIPTID_INIT},
2238 {"shelltype", "st", P_NUM|P_VI_DEF,
2239 #ifdef AMIGA
2240 (char_u *)&p_st, PV_NONE,
2241 #else
2242 (char_u *)NULL, PV_NONE,
2243 #endif
2244 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2245 {"shellxquote", "sxq", P_STRING|P_VI_DEF|P_SECURE,
2246 (char_u *)&p_sxq, PV_NONE,
2247 {
2248 #if defined(UNIX) && defined(USE_SYSTEM) && !defined(__EMX__)
2249 (char_u *)"\"",
2250 #else
2251 (char_u *)"",
2252 #endif
2253 (char_u *)0L} SCRIPTID_INIT},
2254 {"shiftround", "sr", P_BOOL|P_VI_DEF|P_VIM,
2255 (char_u *)&p_sr, PV_NONE,
2256 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2257 {"shiftwidth", "sw", P_NUM|P_VI_DEF,
2258 (char_u *)&p_sw, PV_SW,
2259 {(char_u *)8L, (char_u *)0L} SCRIPTID_INIT},
2260 {"shortmess", "shm", P_STRING|P_VIM|P_FLAGLIST,
2261 (char_u *)&p_shm, PV_NONE,
2262 {(char_u *)"", (char_u *)"filnxtToO"}
2263 SCRIPTID_INIT},
2264 {"shortname", "sn", P_BOOL|P_VI_DEF,
2265 #ifdef SHORT_FNAME
2266 (char_u *)NULL, PV_NONE,
2267 #else
2268 (char_u *)&p_sn, PV_SN,
2269 #endif
2270 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2271 {"showbreak", "sbr", P_STRING|P_VI_DEF|P_RALL,
2272 #ifdef FEAT_LINEBREAK
2273 (char_u *)&p_sbr, PV_NONE,
2274 #else
2275 (char_u *)NULL, PV_NONE,
2276 #endif
2277 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2278 {"showcmd", "sc", P_BOOL|P_VIM,
2279 #ifdef FEAT_CMDL_INFO
2280 (char_u *)&p_sc, PV_NONE,
2281 #else
2282 (char_u *)NULL, PV_NONE,
2283 #endif
2284 {(char_u *)FALSE,
2285 #ifdef UNIX
2286 (char_u *)FALSE
2287 #else
2288 (char_u *)TRUE
2289 #endif
2290 } SCRIPTID_INIT},
2291 {"showfulltag", "sft", P_BOOL|P_VI_DEF,
2292 (char_u *)&p_sft, PV_NONE,
2293 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2294 {"showmatch", "sm", P_BOOL|P_VI_DEF,
2295 (char_u *)&p_sm, PV_NONE,
2296 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2297 {"showmode", "smd", P_BOOL|P_VIM,
2298 (char_u *)&p_smd, PV_NONE,
2299 {(char_u *)FALSE, (char_u *)TRUE} SCRIPTID_INIT},
2300 {"showtabline", "stal", P_NUM|P_VI_DEF|P_RALL,
2301 #ifdef FEAT_WINDOWS
2302 (char_u *)&p_stal, PV_NONE,
2303 #else
2304 (char_u *)NULL, PV_NONE,
2305 #endif
2306 {(char_u *)1L, (char_u *)0L} SCRIPTID_INIT},
2307 {"sidescroll", "ss", P_NUM|P_VI_DEF,
2308 (char_u *)&p_ss, PV_NONE,
2309 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2310 {"sidescrolloff", "siso", P_NUM|P_VI_DEF|P_VIM|P_RBUF,
2311 (char_u *)&p_siso, PV_NONE,
2312 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2313 {"slowopen", "slow", P_BOOL|P_VI_DEF,
2314 (char_u *)NULL, PV_NONE,
2315 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2316 {"smartcase", "scs", P_BOOL|P_VI_DEF|P_VIM,
2317 (char_u *)&p_scs, PV_NONE,
2318 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2319 {"smartindent", "si", P_BOOL|P_VI_DEF|P_VIM,
2320 #ifdef FEAT_SMARTINDENT
2321 (char_u *)&p_si, PV_SI,
2322 #else
2323 (char_u *)NULL, PV_NONE,
2324 #endif
2325 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2326 {"smarttab", "sta", P_BOOL|P_VI_DEF|P_VIM,
2327 (char_u *)&p_sta, PV_NONE,
2328 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2329 {"softtabstop", "sts", P_NUM|P_VI_DEF|P_VIM,
2330 (char_u *)&p_sts, PV_STS,
2331 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2332 {"sourceany", NULL, P_BOOL|P_VI_DEF,
2333 (char_u *)NULL, PV_NONE,
2334 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2335 {"spell", NULL, P_BOOL|P_VI_DEF|P_RWIN,
2336 #ifdef FEAT_SPELL
2337 (char_u *)VAR_WIN, PV_SPELL,
2338 #else
2339 (char_u *)NULL, PV_NONE,
2340 #endif
2341 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2342 {"spellcapcheck", "spc", P_STRING|P_ALLOCED|P_VI_DEF|P_RBUF,
2343 #ifdef FEAT_SPELL
2344 (char_u *)&p_spc, PV_SPC,
2345 {(char_u *)"[.?!]\\_[\\])'\" ]\\+", (char_u *)0L}
2346 #else
2347 (char_u *)NULL, PV_NONE,
2348 {(char_u *)0L, (char_u *)0L}
2349 #endif
2350 SCRIPTID_INIT},
2351 {"spellfile", "spf", P_STRING|P_EXPAND|P_ALLOCED|P_VI_DEF|P_SECURE|P_COMMA,
2352 #ifdef FEAT_SPELL
2353 (char_u *)&p_spf, PV_SPF,
2354 {(char_u *)"", (char_u *)0L}
2355 #else
2356 (char_u *)NULL, PV_NONE,
2357 {(char_u *)0L, (char_u *)0L}
2358 #endif
2359 SCRIPTID_INIT},
2360 {"spelllang", "spl", P_STRING|P_ALLOCED|P_VI_DEF|P_COMMA|P_RBUF|P_EXPAND,
2361 #ifdef FEAT_SPELL
2362 (char_u *)&p_spl, PV_SPL,
2363 {(char_u *)"en", (char_u *)0L}
2364 #else
2365 (char_u *)NULL, PV_NONE,
2366 {(char_u *)0L, (char_u *)0L}
2367 #endif
2368 SCRIPTID_INIT},
2369 {"spellsuggest", "sps", P_STRING|P_VI_DEF|P_EXPAND|P_SECURE|P_COMMA,
2370 #ifdef FEAT_SPELL
2371 (char_u *)&p_sps, PV_NONE,
2372 {(char_u *)"best", (char_u *)0L}
2373 #else
2374 (char_u *)NULL, PV_NONE,
2375 {(char_u *)0L, (char_u *)0L}
2376 #endif
2377 SCRIPTID_INIT},
2378 {"splitbelow", "sb", P_BOOL|P_VI_DEF,
2379 #ifdef FEAT_WINDOWS
2380 (char_u *)&p_sb, PV_NONE,
2381 #else
2382 (char_u *)NULL, PV_NONE,
2383 #endif
2384 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2385 {"splitright", "spr", P_BOOL|P_VI_DEF,
2386 #ifdef FEAT_VERTSPLIT
2387 (char_u *)&p_spr, PV_NONE,
2388 #else
2389 (char_u *)NULL, PV_NONE,
2390 #endif
2391 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2392 {"startofline", "sol", P_BOOL|P_VI_DEF|P_VIM,
2393 (char_u *)&p_sol, PV_NONE,
2394 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2395 {"statusline" ,"stl", P_STRING|P_VI_DEF|P_ALLOCED|P_RSTAT,
2396 #ifdef FEAT_STL_OPT
2397 (char_u *)&p_stl, PV_STL,
2398 #else
2399 (char_u *)NULL, PV_NONE,
2400 #endif
2401 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2402 {"suffixes", "su", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2403 (char_u *)&p_su, PV_NONE,
2404 {(char_u *)".bak,~,.o,.h,.info,.swp,.obj",
2405 (char_u *)0L} SCRIPTID_INIT},
2406 {"suffixesadd", "sua", P_STRING|P_VI_DEF|P_ALLOCED|P_COMMA|P_NODUP,
2407 #ifdef FEAT_SEARCHPATH
2408 (char_u *)&p_sua, PV_SUA,
2409 {(char_u *)"", (char_u *)0L}
2410 #else
2411 (char_u *)NULL, PV_NONE,
2412 {(char_u *)0L, (char_u *)0L}
2413 #endif
2414 SCRIPTID_INIT},
2415 {"swapfile", "swf", P_BOOL|P_VI_DEF|P_RSTAT,
2416 (char_u *)&p_swf, PV_SWF,
2417 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2418 {"swapsync", "sws", P_STRING|P_VI_DEF,
2419 (char_u *)&p_sws, PV_NONE,
2420 {(char_u *)"fsync", (char_u *)0L} SCRIPTID_INIT},
2421 {"switchbuf", "swb", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2422 (char_u *)&p_swb, PV_NONE,
2423 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2424 {"synmaxcol", "smc", P_NUM|P_VI_DEF|P_RBUF,
2425 #ifdef FEAT_SYN_HL
2426 (char_u *)&p_smc, PV_SMC,
2427 {(char_u *)3000L, (char_u *)0L}
2428 #else
2429 (char_u *)NULL, PV_NONE,
2430 {(char_u *)0L, (char_u *)0L}
2431 #endif
2432 SCRIPTID_INIT},
2433 {"syntax", "syn", P_STRING|P_ALLOCED|P_VI_DEF|P_NOGLOB|P_NFNAME,
2434 #ifdef FEAT_SYN_HL
2435 (char_u *)&p_syn, PV_SYN,
2436 {(char_u *)"", (char_u *)0L}
2437 #else
2438 (char_u *)NULL, PV_NONE,
2439 {(char_u *)0L, (char_u *)0L}
2440 #endif
2441 SCRIPTID_INIT},
2442 {"tabline", "tal", P_STRING|P_VI_DEF|P_RALL,
2443 #ifdef FEAT_STL_OPT
2444 (char_u *)&p_tal, PV_NONE,
2445 #else
2446 (char_u *)NULL, PV_NONE,
2447 #endif
2448 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2449 {"tabpagemax", "tpm", P_NUM|P_VI_DEF,
2450 #ifdef FEAT_WINDOWS
2451 (char_u *)&p_tpm, PV_NONE,
2452 #else
2453 (char_u *)NULL, PV_NONE,
2454 #endif
2455 {(char_u *)10L, (char_u *)0L} SCRIPTID_INIT},
2456 {"tabstop", "ts", P_NUM|P_VI_DEF|P_RBUF,
2457 (char_u *)&p_ts, PV_TS,
2458 {(char_u *)8L, (char_u *)0L} SCRIPTID_INIT},
2459 {"tagbsearch", "tbs", P_BOOL|P_VI_DEF,
2460 (char_u *)&p_tbs, PV_NONE,
2461 #ifdef VMS /* binary searching doesn't appear to work on VMS */
2462 {(char_u *)0L, (char_u *)0L}
2463 #else
2464 {(char_u *)TRUE, (char_u *)0L}
2465 #endif
2466 SCRIPTID_INIT},
2467 {"taglength", "tl", P_NUM|P_VI_DEF,
2468 (char_u *)&p_tl, PV_NONE,
2469 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2470 {"tagrelative", "tr", P_BOOL|P_VIM,
2471 (char_u *)&p_tr, PV_NONE,
2472 {(char_u *)FALSE, (char_u *)TRUE} SCRIPTID_INIT},
2473 {"tags", "tag", P_STRING|P_EXPAND|P_VI_DEF|P_COMMA|P_NODUP,
2474 (char_u *)&p_tags, PV_TAGS,
2475 {
2476 #if defined(FEAT_EMACS_TAGS) && !defined(CASE_INSENSITIVE_FILENAME)
2477 (char_u *)"./tags,./TAGS,tags,TAGS",
2478 #else
2479 (char_u *)"./tags,tags",
2480 #endif
2481 (char_u *)0L} SCRIPTID_INIT},
2482 {"tagstack", "tgst", P_BOOL|P_VI_DEF,
2483 (char_u *)&p_tgst, PV_NONE,
2484 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2485 {"term", NULL, P_STRING|P_EXPAND|P_NODEFAULT|P_NO_MKRC|P_VI_DEF|P_RALL,
2486 (char_u *)&T_NAME, PV_NONE,
2487 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2488 {"termbidi", "tbidi", P_BOOL|P_VI_DEF,
2489 #ifdef FEAT_ARABIC
2490 (char_u *)&p_tbidi, PV_NONE,
2491 #else
2492 (char_u *)NULL, PV_NONE,
2493 #endif
2494 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2495 {"termencoding", "tenc", P_STRING|P_VI_DEF|P_RCLR,
2496 #ifdef FEAT_MBYTE
2497 (char_u *)&p_tenc, PV_NONE,
2498 {(char_u *)"", (char_u *)0L}
2499 #else
2500 (char_u *)NULL, PV_NONE,
2501 {(char_u *)0L, (char_u *)0L}
2502 #endif
2503 SCRIPTID_INIT},
2504 {"terse", NULL, P_BOOL|P_VI_DEF,
2505 (char_u *)&p_terse, PV_NONE,
2506 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2507 {"textauto", "ta", P_BOOL|P_VIM,
2508 (char_u *)&p_ta, PV_NONE,
2509 {(char_u *)DFLT_TEXTAUTO, (char_u *)TRUE}
2510 SCRIPTID_INIT},
2511 {"textmode", "tx", P_BOOL|P_VI_DEF|P_NO_MKRC,
2512 (char_u *)&p_tx, PV_TX,
2513 {
2514 #ifdef USE_CRNL
2515 (char_u *)TRUE,
2516 #else
2517 (char_u *)FALSE,
2518 #endif
2519 (char_u *)0L} SCRIPTID_INIT},
2520 {"textwidth", "tw", P_NUM|P_VI_DEF|P_VIM,
2521 (char_u *)&p_tw, PV_TW,
2522 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2523 {"thesaurus", "tsr", P_STRING|P_EXPAND|P_VI_DEF|P_COMMA|P_NODUP,
2524 #ifdef FEAT_INS_EXPAND
2525 (char_u *)&p_tsr, PV_TSR,
2526 #else
2527 (char_u *)NULL, PV_NONE,
2528 #endif
2529 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2530 {"tildeop", "top", P_BOOL|P_VI_DEF|P_VIM,
2531 (char_u *)&p_to, PV_NONE,
2532 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2533 {"timeout", "to", P_BOOL|P_VI_DEF,
2534 (char_u *)&p_timeout, PV_NONE,
2535 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2536 {"timeoutlen", "tm", P_NUM|P_VI_DEF,
2537 (char_u *)&p_tm, PV_NONE,
2538 {(char_u *)1000L, (char_u *)0L} SCRIPTID_INIT},
2539 {"title", NULL, P_BOOL|P_VI_DEF,
2540 #ifdef FEAT_TITLE
2541 (char_u *)&p_title, PV_NONE,
2542 #else
2543 (char_u *)NULL, PV_NONE,
2544 #endif
2545 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2546 {"titlelen", NULL, P_NUM|P_VI_DEF,
2547 #ifdef FEAT_TITLE
2548 (char_u *)&p_titlelen, PV_NONE,
2549 #else
2550 (char_u *)NULL, PV_NONE,
2551 #endif
2552 {(char_u *)85L, (char_u *)0L} SCRIPTID_INIT},
2553 {"titleold", NULL, P_STRING|P_VI_DEF|P_GETTEXT|P_SECURE|P_NO_MKRC,
2554 #ifdef FEAT_TITLE
2555 (char_u *)&p_titleold, PV_NONE,
2556 {(char_u *)N_("Thanks for flying Vim"),
2557 (char_u *)0L}
2558 #else
2559 (char_u *)NULL, PV_NONE,
2560 {(char_u *)0L, (char_u *)0L}
2561 #endif
2562 SCRIPTID_INIT},
2563 {"titlestring", NULL, P_STRING|P_VI_DEF,
2564 #ifdef FEAT_TITLE
2565 (char_u *)&p_titlestring, PV_NONE,
2566 #else
2567 (char_u *)NULL, PV_NONE,
2568 #endif
2569 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2570 #if defined(FEAT_TOOLBAR) && !defined(FEAT_GUI_W32)
2571 {"toolbar", "tb", P_STRING|P_COMMA|P_VI_DEF|P_NODUP,
2572 (char_u *)&p_toolbar, PV_NONE,
2573 {(char_u *)"icons,tooltips", (char_u *)0L}
2574 SCRIPTID_INIT},
2575 #endif
2576 #if defined(FEAT_TOOLBAR) && ((defined(FEAT_GUI_GTK) && defined(HAVE_GTK2)) \
2577 || defined(FEAT_GUI_MACVIM))
2578 {"toolbariconsize", "tbis", P_STRING|P_VI_DEF,
2579 (char_u *)&p_tbis, PV_NONE,
2580 {(char_u *)"small", (char_u *)0L} SCRIPTID_INIT},
2581 #endif
2582 {"transparency", "transp", P_NUM|P_VIM|P_RCLR,
2583 #ifdef FEAT_TRANSPARENCY
2584 (char_u *)&p_transp, PV_NONE,
2585 #else
2586 (char_u *)NULL, PV_NONE,
2587 #endif
2588 {(char_u *)0L, (char_u *)0L} },
2589 {"ttimeout", NULL, P_BOOL|P_VI_DEF|P_VIM,
2590 (char_u *)&p_ttimeout, PV_NONE,
2591 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2592 {"ttimeoutlen", "ttm", P_NUM|P_VI_DEF,
2593 (char_u *)&p_ttm, PV_NONE,
2594 {(char_u *)-1L, (char_u *)0L} SCRIPTID_INIT},
2595 {"ttybuiltin", "tbi", P_BOOL|P_VI_DEF,
2596 (char_u *)&p_tbi, PV_NONE,
2597 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2598 {"ttyfast", "tf", P_BOOL|P_NO_MKRC|P_VI_DEF,
2599 (char_u *)&p_tf, PV_NONE,
2600 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2601 {"ttymouse", "ttym", P_STRING|P_NODEFAULT|P_NO_MKRC|P_VI_DEF,
2602 #if defined(FEAT_MOUSE) && (defined(UNIX) || defined(VMS))
2603 (char_u *)&p_ttym, PV_NONE,
2604 #else
2605 (char_u *)NULL, PV_NONE,
2606 #endif
2607 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2608 {"ttyscroll", "tsl", P_NUM|P_VI_DEF,
2609 (char_u *)&p_ttyscroll, PV_NONE,
2610 {(char_u *)999L, (char_u *)0L} SCRIPTID_INIT},
2611 {"ttytype", "tty", P_STRING|P_EXPAND|P_NODEFAULT|P_NO_MKRC|P_VI_DEF|P_RALL,
2612 (char_u *)&T_NAME, PV_NONE,
2613 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2614 {"undolevels", "ul", P_NUM|P_VI_DEF,
2615 (char_u *)&p_ul, PV_NONE,
2616 {
2617 #if defined(UNIX) || defined(WIN3264) || defined(OS2) || defined(VMS)
2618 (char_u *)1000L,
2619 #else
2620 (char_u *)100L,
2621 #endif
2622 (char_u *)0L} SCRIPTID_INIT},
2623 {"updatecount", "uc", P_NUM|P_VI_DEF,
2624 (char_u *)&p_uc, PV_NONE,
2625 {(char_u *)200L, (char_u *)0L} SCRIPTID_INIT},
2626 {"updatetime", "ut", P_NUM|P_VI_DEF,
2627 (char_u *)&p_ut, PV_NONE,
2628 {(char_u *)4000L, (char_u *)0L} SCRIPTID_INIT},
2629 {"verbose", "vbs", P_NUM|P_VI_DEF,
2630 (char_u *)&p_verbose, PV_NONE,
2631 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2632 {"verbosefile", "vfile", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
2633 (char_u *)&p_vfile, PV_NONE,
2634 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2635 {"viewdir", "vdir", P_STRING|P_EXPAND|P_VI_DEF|P_SECURE,
2636 #ifdef FEAT_SESSION
2637 (char_u *)&p_vdir, PV_NONE,
2638 {(char_u *)DFLT_VDIR, (char_u *)0L}
2639 #else
2640 (char_u *)NULL, PV_NONE,
2641 {(char_u *)0L, (char_u *)0L}
2642 #endif
2643 SCRIPTID_INIT},
2644 {"viewoptions", "vop", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2645 #ifdef FEAT_SESSION
2646 (char_u *)&p_vop, PV_NONE,
2647 {(char_u *)"folds,options,cursor", (char_u *)0L}
2648 #else
2649 (char_u *)NULL, PV_NONE,
2650 {(char_u *)0L, (char_u *)0L}
2651 #endif
2652 SCRIPTID_INIT},
2653 {"viminfo", "vi", P_STRING|P_COMMA|P_NODUP|P_SECURE,
2654 #ifdef FEAT_VIMINFO
2655 (char_u *)&p_viminfo, PV_NONE,
2656 #if defined(MSDOS) || defined(MSWIN) || defined(OS2)
2657 {(char_u *)"", (char_u *)"'100,<50,s10,h,rA:,rB:"}
2658 #else
2659 # ifdef AMIGA
2660 {(char_u *)"",
2661 (char_u *)"'100,<50,s10,h,rdf0:,rdf1:,rdf2:"}
2662 # else
2663 {(char_u *)"", (char_u *)"'100,<50,s10,h"}
2664 # endif
2665 #endif
2666 #else
2667 (char_u *)NULL, PV_NONE,
2668 {(char_u *)0L, (char_u *)0L}
2669 #endif
2670 SCRIPTID_INIT},
2671 {"virtualedit", "ve", P_STRING|P_COMMA|P_NODUP|P_VI_DEF|P_VIM,
2672 #ifdef FEAT_VIRTUALEDIT
2673 (char_u *)&p_ve, PV_NONE,
2674 {(char_u *)"", (char_u *)""}
2675 #else
2676 (char_u *)NULL, PV_NONE,
2677 {(char_u *)0L, (char_u *)0L}
2678 #endif
2679 SCRIPTID_INIT},
2680 {"visualbell", "vb", P_BOOL|P_VI_DEF,
2681 (char_u *)&p_vb, PV_NONE,
2682 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2683 {"w300", NULL, P_NUM|P_VI_DEF,
2684 (char_u *)NULL, PV_NONE,
2685 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2686 {"w1200", NULL, P_NUM|P_VI_DEF,
2687 (char_u *)NULL, PV_NONE,
2688 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2689 {"w9600", NULL, P_NUM|P_VI_DEF,
2690 (char_u *)NULL, PV_NONE,
2691 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2692 {"warn", NULL, P_BOOL|P_VI_DEF,
2693 (char_u *)&p_warn, PV_NONE,
2694 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2695 {"weirdinvert", "wiv", P_BOOL|P_VI_DEF|P_RCLR,
2696 (char_u *)&p_wiv, PV_NONE,
2697 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2698 {"whichwrap", "ww", P_STRING|P_VIM|P_COMMA|P_FLAGLIST,
2699 (char_u *)&p_ww, PV_NONE,
2700 {(char_u *)"", (char_u *)"b,s"} SCRIPTID_INIT},
2701 {"wildchar", "wc", P_NUM|P_VIM,
2702 (char_u *)&p_wc, PV_NONE,
2703 {(char_u *)(long)Ctrl_E, (char_u *)(long)TAB}
2704 SCRIPTID_INIT},
2705 {"wildcharm", "wcm", P_NUM|P_VI_DEF,
2706 (char_u *)&p_wcm, PV_NONE,
2707 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2708 {"wildignore", "wig", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2709 #ifdef FEAT_WILDIGN
2710 (char_u *)&p_wig, PV_NONE,
2711 #else
2712 (char_u *)NULL, PV_NONE,
2713 #endif
2714 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2715 {"wildmenu", "wmnu", P_BOOL|P_VI_DEF,
2716 #ifdef FEAT_WILDMENU
2717 (char_u *)&p_wmnu, PV_NONE,
2718 #else
2719 (char_u *)NULL, PV_NONE,
2720 #endif
2721 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2722 {"wildmode", "wim", P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
2723 (char_u *)&p_wim, PV_NONE,
2724 {(char_u *)"full", (char_u *)0L} SCRIPTID_INIT},
2725 {"wildoptions", "wop", P_STRING|P_VI_DEF,
2726 #ifdef FEAT_CMDL_COMPL
2727 (char_u *)&p_wop, PV_NONE,
2728 {(char_u *)"", (char_u *)0L}
2729 #else
2730 (char_u *)NULL, PV_NONE,
2731 {(char_u *)NULL, (char_u *)0L}
2732 #endif
2733 SCRIPTID_INIT},
2734 {"winaltkeys", "wak", P_STRING|P_VI_DEF,
2735 #ifdef FEAT_WAK
2736 (char_u *)&p_wak, PV_NONE,
2737 {(char_u *)"menu", (char_u *)0L}
2738 #else
2739 (char_u *)NULL, PV_NONE,
2740 {(char_u *)NULL, (char_u *)0L}
2741 #endif
2742 SCRIPTID_INIT},
2743 {"window", "wi", P_NUM|P_VI_DEF,
2744 (char_u *)&p_window, PV_NONE,
2745 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2746 {"winheight", "wh", P_NUM|P_VI_DEF,
2747 #ifdef FEAT_WINDOWS
2748 (char_u *)&p_wh, PV_NONE,
2749 #else
2750 (char_u *)NULL, PV_NONE,
2751 #endif
2752 {(char_u *)1L, (char_u *)0L} SCRIPTID_INIT},
2753 {"winfixheight", "wfh", P_BOOL|P_VI_DEF|P_RSTAT,
2754 #ifdef FEAT_WINDOWS
2755 (char_u *)VAR_WIN, PV_WFH,
2756 #else
2757 (char_u *)NULL, PV_NONE,
2758 #endif
2759 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2760 {"winfixwidth", "wfw", P_BOOL|P_VI_DEF|P_RSTAT,
2761 #ifdef FEAT_VERTSPLIT
2762 (char_u *)VAR_WIN, PV_WFW,
2763 #else
2764 (char_u *)NULL, PV_NONE,
2765 #endif
2766 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2767 {"winminheight", "wmh", P_NUM|P_VI_DEF,
2768 #ifdef FEAT_WINDOWS
2769 (char_u *)&p_wmh, PV_NONE,
2770 #else
2771 (char_u *)NULL, PV_NONE,
2772 #endif
2773 {(char_u *)1L, (char_u *)0L} SCRIPTID_INIT},
2774 {"winminwidth", "wmw", P_NUM|P_VI_DEF,
2775 #ifdef FEAT_VERTSPLIT
2776 (char_u *)&p_wmw, PV_NONE,
2777 #else
2778 (char_u *)NULL, PV_NONE,
2779 #endif
2780 {(char_u *)1L, (char_u *)0L} SCRIPTID_INIT},
2781 {"winwidth", "wiw", P_NUM|P_VI_DEF,
2782 #ifdef FEAT_VERTSPLIT
2783 (char_u *)&p_wiw, PV_NONE,
2784 #else
2785 (char_u *)NULL, PV_NONE,
2786 #endif
2787 {(char_u *)20L, (char_u *)0L} SCRIPTID_INIT},
2788 {"wrap", NULL, P_BOOL|P_VI_DEF|P_RWIN,
2789 (char_u *)VAR_WIN, PV_WRAP,
2790 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2791 {"wrapmargin", "wm", P_NUM|P_VI_DEF,
2792 (char_u *)&p_wm, PV_WM,
2793 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2794 {"wrapscan", "ws", P_BOOL|P_VI_DEF,
2795 (char_u *)&p_ws, PV_NONE,
2796 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2797 {"write", NULL, P_BOOL|P_VI_DEF,
2798 (char_u *)&p_write, PV_NONE,
2799 {(char_u *)TRUE, (char_u *)0L} SCRIPTID_INIT},
2800 {"writeany", "wa", P_BOOL|P_VI_DEF,
2801 (char_u *)&p_wa, PV_NONE,
2802 {(char_u *)FALSE, (char_u *)0L} SCRIPTID_INIT},
2803 {"writebackup", "wb", P_BOOL|P_VI_DEF|P_VIM,
2804 (char_u *)&p_wb, PV_NONE,
2805 {
2806 #ifdef FEAT_WRITEBACKUP
2807 (char_u *)TRUE,
2808 #else
2809 (char_u *)FALSE,
2810 #endif
2811 (char_u *)0L} SCRIPTID_INIT},
2812 {"writedelay", "wd", P_NUM|P_VI_DEF,
2813 (char_u *)&p_wd, PV_NONE,
2814 {(char_u *)0L, (char_u *)0L} SCRIPTID_INIT},
2815
2816 /* terminal output codes */
2817 #define p_term(sss, vvv) {sss, NULL, P_STRING|P_VI_DEF|P_RALL|P_SECURE, \
2818 (char_u *)&vvv, PV_NONE, \
2819 {(char_u *)"", (char_u *)0L} SCRIPTID_INIT},
2820
2821 p_term("t_AB", T_CAB)
2822 p_term("t_AF", T_CAF)
2823 p_term("t_AL", T_CAL)
2824 p_term("t_al", T_AL)
2825 p_term("t_bc", T_BC)
2826 p_term("t_cd", T_CD)
2827 p_term("t_ce", T_CE)
2828 p_term("t_cl", T_CL)
2829 p_term("t_cm", T_CM)
2830 p_term("t_Co", T_CCO)
2831 p_term("t_CS", T_CCS)
2832 p_term("t_cs", T_CS)
2833 #ifdef FEAT_VERTSPLIT
2834 p_term("t_CV", T_CSV)
2835 #endif
2836 p_term("t_ut", T_UT)
2837 p_term("t_da", T_DA)
2838 p_term("t_db", T_DB)
2839 p_term("t_DL", T_CDL)
2840 p_term("t_dl", T_DL)
2841 p_term("t_fs", T_FS)
2842 p_term("t_IE", T_CIE)
2843 p_term("t_IS", T_CIS)
2844 p_term("t_ke", T_KE)
2845 p_term("t_ks", T_KS)
2846 p_term("t_le", T_LE)
2847 p_term("t_mb", T_MB)
2848 p_term("t_md", T_MD)
2849 p_term("t_me", T_ME)
2850 p_term("t_mr", T_MR)
2851 p_term("t_ms", T_MS)
2852 p_term("t_nd", T_ND)
2853 p_term("t_op", T_OP)
2854 p_term("t_RI", T_CRI)
2855 p_term("t_RV", T_CRV)
2856 p_term("t_Sb", T_CSB)
2857 p_term("t_Sf", T_CSF)
2858 p_term("t_se", T_SE)
2859 p_term("t_so", T_SO)
2860 p_term("t_sr", T_SR)
2861 p_term("t_ts", T_TS)
2862 p_term("t_te", T_TE)
2863 p_term("t_ti", T_TI)
2864 p_term("t_ue", T_UE)
2865 p_term("t_us", T_US)
2866 p_term("t_vb", T_VB)
2867 p_term("t_ve", T_VE)
2868 p_term("t_vi", T_VI)
2869 p_term("t_vs", T_VS)
2870 p_term("t_WP", T_CWP)
2871 p_term("t_WS", T_CWS)
2872 p_term("t_SI", T_CSI)
2873 p_term("t_EI", T_CEI)
2874 p_term("t_xs", T_XS)
2875 p_term("t_ZH", T_CZH)
2876 p_term("t_ZR", T_CZR)
2877
2878 /* terminal key codes are not in here */
2879
2880 /* end marker */
2881 {NULL, NULL, 0, NULL, PV_NONE, {NULL, NULL} SCRIPTID_INIT}
2882 };
2883
2884 #define PARAM_COUNT (sizeof(options) / sizeof(struct vimoption))
2885
2886 #ifdef FEAT_MBYTE
2887 static char *(p_ambw_values[]) = {"single", "double", NULL};
2888 #endif
2889 static char *(p_bg_values[]) = {"light", "dark", NULL};
2890 static char *(p_nf_values[]) = {"octal", "hex", "alpha", NULL};
2891 static char *(p_ff_values[]) = {FF_UNIX, FF_DOS, FF_MAC, NULL};
2892 #ifdef FEAT_CMDL_COMPL
2893 static char *(p_wop_values[]) = {"tagfile", NULL};
2894 #endif
2895 #ifdef FEAT_WAK
2896 static char *(p_wak_values[]) = {"yes", "menu", "no", NULL};
2897 #endif
2898 static char *(p_mousem_values[]) = {"extend", "popup", "popup_setpos", "mac", NULL};
2899 #ifdef FEAT_VISUAL
2900 static char *(p_sel_values[]) = {"inclusive", "exclusive", "old", NULL};
2901 static char *(p_slm_values[]) = {"mouse", "key", "cmd", NULL};
2902 #endif
2903 #ifdef FEAT_VISUAL
2904 static char *(p_km_values[]) = {"startsel", "stopsel", NULL};
2905 #endif
2906 #ifdef FEAT_BROWSE
2907 static char *(p_bsdir_values[]) = {"current", "last", "buffer", NULL};
2908 #endif
2909 #ifdef FEAT_SCROLLBIND
2910 static char *(p_scbopt_values[]) = {"ver", "hor", "jump", NULL};
2911 #endif
2912 static char *(p_debug_values[]) = {"msg", "throw", "beep", NULL};
2913 #ifdef FEAT_VERTSPLIT
2914 static char *(p_ead_values[]) = {"both", "ver", "hor", NULL};
2915 #endif
2916 #if defined(FEAT_QUICKFIX)
2917 # ifdef FEAT_AUTOCMD
2918 static char *(p_buftype_values[]) = {"nofile", "nowrite", "quickfix", "help", "acwrite", NULL};
2919 # else
2920 static char *(p_buftype_values[]) = {"nofile", "nowrite", "quickfix", "help", NULL};
2921 # endif
2922 static char *(p_bufhidden_values[]) = {"hide", "unload", "delete", "wipe", NULL};
2923 #endif
2924 static char *(p_bs_values[]) = {"indent", "eol", "start", NULL};
2925 #ifdef FEAT_FOLDING
2926 static char *(p_fdm_values[]) = {"manual", "expr", "marker", "indent", "syntax",
2927 # ifdef FEAT_DIFF
2928 "diff",
2929 # endif
2930 NULL};
2931 static char *(p_fcl_values[]) = {"all", NULL};
2932 #endif
2933 #ifdef FEAT_INS_EXPAND
2934 static char *(p_cot_values[]) = {"menu", "menuone", "longest", "preview", NULL};
2935 #endif
2936
2937 static void set_option_default __ARGS((int, int opt_flags, int compatible));
2938 static void set_options_default __ARGS((int opt_flags));
2939 static char_u *term_bg_default __ARGS((void));
2940 static void did_set_option __ARGS((int opt_idx, int opt_flags, int new_value));
2941 static char_u *illegal_char __ARGS((char_u *, int));
2942 static int string_to_key __ARGS((char_u *arg));
2943 #ifdef FEAT_CMDWIN
2944 static char_u *check_cedit __ARGS((void));
2945 #endif
2946 #ifdef FEAT_TITLE
2947 static void did_set_title __ARGS((int icon));
2948 #endif
2949 static char_u *option_expand __ARGS((int opt_idx, char_u *val));
2950 static void didset_options __ARGS((void));
2951 static void check_string_option __ARGS((char_u **pp));
2952 #if defined(FEAT_EVAL) || defined(PROTO)
2953 static long_u *insecure_flag __ARGS((int opt_idx, int opt_flags));
2954 #else
2955 # define insecure_flag(opt_idx, opt_flags) (&options[opt_idx].flags)
2956 #endif
2957 static void set_string_option_global __ARGS((int opt_idx, char_u **varp));
2958 static void set_string_option __ARGS((int opt_idx, char_u *value, int opt_flags));
2959 static char_u *did_set_string_option __ARGS((int opt_idx, char_u **varp, int new_value_alloced, char_u *oldval, char_u *errbuf, int opt_flags));
2960 static char_u *set_chars_option __ARGS((char_u **varp));
2961 #ifdef FEAT_CLIPBOARD
2962 static char_u *check_clipboard_option __ARGS((void));
2963 #endif
2964 #ifdef FEAT_SPELL
2965 static char_u *compile_cap_prog __ARGS((buf_T *buf));
2966 #endif
2967 #ifdef FEAT_EVAL
2968 static void set_option_scriptID_idx __ARGS((int opt_idx, int opt_flags, int id));
2969 #endif
2970 static char_u *set_bool_option __ARGS((int opt_idx, char_u *varp, int value, int opt_flags));
2971 static char_u *set_num_option __ARGS((int opt_idx, char_u *varp, long value, char_u *errbuf, size_t errbuflen, int opt_flags));
2972 static void check_redraw __ARGS((long_u flags));
2973 static int findoption __ARGS((char_u *));
2974 static int find_key_option __ARGS((char_u *));
2975 static void showoptions __ARGS((int all, int opt_flags));
2976 static int optval_default __ARGS((struct vimoption *, char_u *varp));
2977 static void showoneopt __ARGS((struct vimoption *, int opt_flags));
2978 static int put_setstring __ARGS((FILE *fd, char *cmd, char *name, char_u **valuep, int expand));
2979 static int put_setnum __ARGS((FILE *fd, char *cmd, char *name, long *valuep));
2980 static int put_setbool __ARGS((FILE *fd, char *cmd, char *name, int value));
2981 static int istermoption __ARGS((struct vimoption *));
2982 static char_u *get_varp_scope __ARGS((struct vimoption *p, int opt_flags));
2983 static char_u *get_varp __ARGS((struct vimoption *));
2984 static void option_value2string __ARGS((struct vimoption *, int opt_flags));
2985 static int wc_use_keyname __ARGS((char_u *varp, long *wcp));
2986 #ifdef FEAT_LANGMAP
2987 static void langmap_init __ARGS((void));
2988 static void langmap_set __ARGS((void));
2989 #endif
2990 static void paste_option_changed __ARGS((void));
2991 static void compatible_set __ARGS((void));
2992 #ifdef FEAT_LINEBREAK
2993 static void fill_breakat_flags __ARGS((void));
2994 #endif
2995 static int opt_strings_flags __ARGS((char_u *val, char **values, unsigned *flagp, int list));
2996 static int check_opt_strings __ARGS((char_u *val, char **values, int));
2997 static int check_opt_wim __ARGS((void));
2998 #ifdef FEAT_FULLSCREEN
2999 static int check_fuoptions __ARGS((char_u *, unsigned *, int *));
3000 #endif
3001
3002 /*
3003 * Initialize the options, first part.
3004 *
3005 * Called only once from main(), just after creating the first buffer.
3006 */
3007 void
3008 set_init_1()
3009 {
3010 char_u *p;
3011 int opt_idx;
3012 long_u n;
3013 #if defined(FEAT_GUI_MACVIM) && defined(FEAT_MBYTE)
3014 int did_mb_init;
3015 #endif
3016
3017 #ifdef FEAT_LANGMAP
3018 langmap_init();
3019 #endif
3020
3021 /* Be Vi compatible by default */
3022 p_cp = TRUE;
3023
3024 /* Use POSIX compatibility when $VIM_POSIX is set. */
3025 if (mch_getenv((char_u *)"VIM_POSIX") != NULL)
3026 {
3027 set_string_default("cpo", (char_u *)CPO_ALL);
3028 set_string_default("shm", (char_u *)"A");
3029 }
3030
3031 /*
3032 * Find default value for 'shell' option.
3033 * Don't use it if it is empty.
3034 */
3035 if (((p = mch_getenv((char_u *)"SHELL")) != NULL && *p != NUL)
3036 #if defined(MSDOS) || defined(MSWIN) || defined(OS2)
3037 # ifdef __EMX__
3038 || ((p = mch_getenv((char_u *)"EMXSHELL")) != NULL && *p != NUL)
3039 # endif
3040 || ((p = mch_getenv((char_u *)"COMSPEC")) != NULL && *p != NUL)
3041 # ifdef WIN3264
3042 || ((p = default_shell()) != NULL && *p != NUL)
3043 # endif
3044 #endif
3045 )
3046 set_string_default("sh", p);
3047
3048 #ifdef FEAT_WILDIGN
3049 /*
3050 * Set the default for 'backupskip' to include environment variables for
3051 * temp files.
3052 */
3053 {
3054 # ifdef UNIX
3055 static char *(names[4]) = {"", "TMPDIR", "TEMP", "TMP"};
3056 # else
3057 static char *(names[3]) = {"TMPDIR", "TEMP", "TMP"};
3058 # endif
3059 int len;
3060 garray_T ga;
3061 int mustfree;
3062
3063 ga_init2(&ga, 1, 100);
3064 for (n = 0; n < (long)(sizeof(names) / sizeof(char *)); ++n)
3065 {
3066 mustfree = FALSE;
3067 # ifdef UNIX
3068 if (*names[n] == NUL)
3069 p = (char_u *)"/tmp";
3070 else
3071 # endif
3072 p = vim_getenv((char_u *)names[n], &mustfree);
3073 if (p != NULL && *p != NUL)
3074 {
3075 /* First time count the NUL, otherwise count the ','. */
3076 len = (int)STRLEN(p) + 3;
3077 if (ga_grow(&ga, len) == OK)
3078 {
3079 if (ga.ga_len > 0)
3080 STRCAT(ga.ga_data, ",");
3081 STRCAT(ga.ga_data, p);
3082 add_pathsep(ga.ga_data);
3083 STRCAT(ga.ga_data, "*");
3084 ga.ga_len += len;
3085 }
3086 }
3087 if (mustfree)
3088 vim_free(p);
3089 }
3090 if (ga.ga_data != NULL)
3091 {
3092 set_string_default("bsk", ga.ga_data);
3093 vim_free(ga.ga_data);
3094 }
3095 }
3096 #endif
3097
3098 /*
3099 * 'maxmemtot' and 'maxmem' may have to be adjusted for available memory
3100 */
3101 opt_idx = findoption((char_u *)"maxmemtot");
3102 if (opt_idx >= 0)
3103 {
3104 #if !defined(HAVE_AVAIL_MEM) && !defined(HAVE_TOTAL_MEM)
3105 if (options[opt_idx].def_val[VI_DEFAULT] == (char_u *)0L)
3106 #endif
3107 {
3108 #ifdef HAVE_AVAIL_MEM
3109 /* Use amount of memory available at this moment. */
3110 n = (mch_avail_mem(FALSE) >> 11);
3111 #else
3112 # ifdef HAVE_TOTAL_MEM
3113 /* Use amount of memory available to Vim. */
3114 n = (mch_total_mem(FALSE) >> 1);
3115 # else
3116 n = (0x7fffffff >> 11);
3117 # endif
3118 #endif
3119 options[opt_idx].def_val[VI_DEFAULT] = (char_u *)n;
3120 opt_idx = findoption((char_u *)"maxmem");
3121 if (opt_idx >= 0)
3122 {
3123 #if !defined(HAVE_AVAIL_MEM) && !defined(HAVE_TOTAL_MEM)
3124 if ((long)options[opt_idx].def_val[VI_DEFAULT] > n
3125 || (long)options[opt_idx].def_val[VI_DEFAULT] == 0L)
3126 #endif
3127 options[opt_idx].def_val[VI_DEFAULT] = (char_u *)n;
3128 }
3129 }
3130 }
3131
3132 #ifdef FEAT_GUI_W32
3133 /* force 'shortname' for Win32s */
3134 if (gui_is_win32s())
3135 {
3136 opt_idx = findoption((char_u *)"shortname");
3137 if (opt_idx >= 0)
3138 options[opt_idx].def_val[VI_DEFAULT] = (char_u *)TRUE;
3139 }
3140 #endif
3141
3142 #ifdef FEAT_SEARCHPATH
3143 {
3144 char_u *cdpath;
3145 char_u *buf;
3146 int i;
3147 int j;
3148 int mustfree = FALSE;
3149
3150 /* Initialize the 'cdpath' option's default value. */
3151 cdpath = vim_getenv((char_u *)"CDPATH", &mustfree);
3152 if (cdpath != NULL)
3153 {
3154 buf = alloc((unsigned)((STRLEN(cdpath) << 1) + 2));
3155 if (buf != NULL)
3156 {
3157 buf[0] = ','; /* start with ",", current dir first */
3158 j = 1;
3159 for (i = 0; cdpath[i] != NUL; ++i)
3160 {
3161 if (vim_ispathlistsep(cdpath[i]))
3162 buf[j++] = ',';
3163 else
3164 {
3165 if (cdpath[i] == ' ' || cdpath[i] == ',')
3166 buf[j++] = '\\';
3167 buf[j++] = cdpath[i];
3168 }
3169 }
3170 buf[j] = NUL;
3171 opt_idx = findoption((char_u *)"cdpath");
3172 if (opt_idx >= 0)
3173 {
3174 options[opt_idx].def_val[VI_DEFAULT] = buf;
3175 options[opt_idx].flags |= P_DEF_ALLOCED;
3176 }
3177 }
3178 if (mustfree)
3179 vim_free(cdpath);
3180 }
3181 }
3182 #endif
3183
3184 #if defined(FEAT_POSTSCRIPT) && (defined(MSWIN) || defined(OS2) || defined(VMS) || defined(EBCDIC) || defined(MAC) || defined(hpux))
3185 /* Set print encoding on platforms that don't default to latin1 */
3186 set_string_default("penc",
3187 # if defined(MSWIN) || defined(OS2)
3188 (char_u *)"cp1252"
3189 # else
3190 # ifdef VMS
3191 (char_u *)"dec-mcs"
3192 # else
3193 # ifdef EBCDIC
3194 (char_u *)"ebcdic-uk"
3195 # else
3196 # ifdef MAC
3197 (char_u *)"mac-roman"
3198 # else /* HPUX */
3199 (char_u *)"hp-roman8"
3200 # endif
3201 # endif
3202 # endif
3203 # endif
3204 );
3205 #endif
3206
3207 #ifdef FEAT_POSTSCRIPT
3208 /* 'printexpr' must be allocated to be able to evaluate it. */
3209 set_string_default("pexpr",
3210 # if defined(MSWIN) || defined(MSDOS) || defined(OS2)
3211 (char_u *)"system('copy' . ' ' . v:fname_in . (&printdevice == '' ? ' LPT1:' : (' \"' . &printdevice . '\"'))) . delete(v:fname_in)"
3212 # else
3213 # ifdef VMS
3214 (char_u *)"system('print/delete' . (&printdevice == '' ? '' : ' /queue=' . &printdevice) . ' ' . v:fname_in)"
3215
3216 # else
3217 (char_u *)"system('lpr' . (&printdevice == '' ? '' : ' -P' . &printdevice) . ' ' . v:fname_in) . delete(v:fname_in) + v:shell_error"
3218 # endif
3219 # endif
3220 );
3221 #endif
3222
3223 /*
3224 * Set all the options (except the terminal options) to their default
3225 * value. Also set the global value for local options.
3226 */
3227 set_options_default(0);
3228
3229 #ifdef FEAT_GUI
3230 if (found_reverse_arg)
3231 set_option_value((char_u *)"bg", 0L, (char_u *)"dark", 0);
3232 #endif
3233
3234 curbuf->b_p_initialized = TRUE;
3235 curbuf->b_p_ar = -1; /* no local 'autoread' value */
3236 check_buf_options(curbuf);
3237 check_win_options(curwin);
3238 check_options();
3239
3240 /* Must be before option_expand(), because that one needs vim_isIDc() */
3241 didset_options();
3242
3243 #ifdef FEAT_SPELL
3244 /* Use the current chartab for the generic chartab. */
3245 init_spell_chartab();
3246 #endif
3247
3248 #ifdef FEAT_LINEBREAK
3249 /*
3250 * initialize the table for 'breakat'.
3251 */
3252 fill_breakat_flags();
3253 #endif
3254
3255 /*
3256 * Expand environment variables and things like "~" for the defaults.
3257 * If option_expand() returns non-NULL the variable is expanded. This can
3258 * only happen for non-indirect options.
3259 * Also set the default to the expanded value, so ":set" does not list
3260 * them.
3261 * Don't set the P_ALLOCED flag, because we don't want to free the
3262 * default.
3263 */
3264 for (opt_idx = 0; !istermoption(&options[opt_idx]); opt_idx++)
3265 {
3266 if ((options[opt_idx].flags & P_GETTEXT)
3267 && options[opt_idx].var != NULL)
3268 p = (char_u *)_(*(char **)options[opt_idx].var);
3269 else
3270 p = option_expand(opt_idx, NULL);
3271 if (p != NULL && (p = vim_strsave(p)) != NULL)
3272 {
3273 *(char_u **)options[opt_idx].var = p;
3274 /* VIMEXP
3275 * Defaults for all expanded options are currently the same for Vi
3276 * and Vim. When this changes, add some code here! Also need to
3277 * split P_DEF_ALLOCED in two.
3278 */
3279 if (options[opt_idx].flags & P_DEF_ALLOCED)
3280 vim_free(options[opt_idx].def_val[VI_DEFAULT]);
3281 options[opt_idx].def_val[VI_DEFAULT] = p;
3282 options[opt_idx].flags |= P_DEF_ALLOCED;
3283 }
3284 }
3285
3286 /* Initialize the highlight_attr[] table. */
3287 highlight_changed();
3288
3289 save_file_ff(curbuf); /* Buffer is unchanged */
3290
3291 /* Parse default for 'wildmode' */
3292 check_opt_wim();
3293
3294 #if defined(FEAT_ARABIC)
3295 /* Detect use of mlterm.
3296 * Mlterm is a terminal emulator akin to xterm that has some special
3297 * abilities (bidi namely).
3298 * NOTE: mlterm's author is being asked to 'set' a variable
3299 * instead of an environment variable due to inheritance.
3300 */
3301 if (mch_getenv((char_u *)"MLTERM") != NULL)
3302 set_option_value((char_u *)"tbidi", 1L, NULL, 0);
3303 #endif
3304
3305 #if defined(FEAT_WINDOWS) || defined(FEAT_FOLDING)
3306 /* Parse default for 'fillchars'. */
3307 (void)set_chars_option(&p_fcs);
3308 #endif
3309
3310 #ifdef FEAT_CLIPBOARD
3311 /* Parse default for 'clipboard' */
3312 (void)check_clipboard_option();
3313 #endif
3314
3315 #ifdef FEAT_MBYTE
3316 # if defined(WIN3264) && defined(FEAT_GETTEXT)
3317 /*
3318 * If $LANG isn't set, try to get a good value for it. This makes the
3319 * right language be used automatically. Don't do this for English.
3320 */
3321 if (mch_getenv((char_u *)"LANG") == NULL)
3322 {
3323 char buf[20];
3324
3325 /* Could use LOCALE_SISO639LANGNAME, but it's not in Win95.
3326 * LOCALE_SABBREVLANGNAME gives us three letters, like "enu", we use
3327 * only the first two. */
3328 n = GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SABBREVLANGNAME,
3329 (LPTSTR)buf, 20);
3330 if (n >= 2 && STRNICMP(buf, "en", 2) != 0)
3331 {
3332 /* There are a few exceptions (probably more) */
3333 if (STRNICMP(buf, "cht", 3) == 0 || STRNICMP(buf, "zht", 3) == 0)
3334 STRCPY(buf, "zh_TW");
3335 else if (STRNICMP(buf, "chs", 3) == 0
3336 || STRNICMP(buf, "zhc", 3) == 0)
3337 STRCPY(buf, "zh_CN");
3338 else if (STRNICMP(buf, "jp", 2) == 0)
3339 STRCPY(buf, "ja");
3340 else
3341 buf[2] = NUL; /* truncate to two-letter code */
3342 vim_setenv("LANG", buf);
3343 }
3344 }
3345 # else
3346 # ifdef MACOS_CONVERT
3347 /* Moved to os_mac_conv.c to avoid dependency problems. */
3348 mac_lang_init();
3349 # endif
3350 # endif
3351
3352 /* enc_locale() will try to find the encoding of the current locale. */
3353 p = enc_locale();
3354 if (p != NULL)
3355 {
3356 char_u *save_enc;
3357
3358 /* Try setting 'encoding' and check if the value is valid.
3359 * If not, go back to the default "latin1". */
3360 save_enc = p_enc;
3361 p_enc = p;
3362 if (STRCMP(p_enc, "gb18030") == 0)
3363 {
3364 /* We don't support "gb18030", but "cp936" is a good substitute
3365 * for practical purposes, thus use that. It's not an alias to
3366 * still support conversion between gb18030 and utf-8. */
3367 p_enc = vim_strsave((char_u *)"cp936");
3368 vim_free(p);
3369 }
3370 #if defined(FEAT_GUI_MACVIM)
3371 did_mb_init = (mb_init() == NULL);
3372 if (!did_mb_init)
3373 {
3374 /* The encoding returned by enc_locale() was invalid, so fall back
3375 * on using utf-8 as the default encoding in MacVim. */
3376 vim_free(p_enc);
3377 p_enc = vim_strsave((char_u *)"utf-8");
3378 did_mb_init = (mb_init() == NULL);
3379 }
3380
3381 /* did_mb_init should always be TRUE, but check just in case. */
3382 if (did_mb_init)
3383 #else
3384 if (mb_init() == NULL)
3385 #endif
3386 {
3387 opt_idx = findoption((char_u *)"encoding");
3388 if (opt_idx >= 0)
3389 {
3390 options[opt_idx].def_val[VI_DEFAULT] = p_enc;
3391 options[opt_idx].flags |= P_DEF_ALLOCED;
3392 }
3393
3394 #if defined(MSDOS) || defined(MSWIN) || defined(OS2) || defined(MACOS) \
3395 || defined(VMS)
3396 if (STRCMP(p_enc, "latin1") == 0
3397 # ifdef FEAT_MBYTE
3398 || enc_utf8
3399 # endif
3400 )
3401 {
3402 /* Adjust the default for 'isprint' and 'iskeyword' to match
3403 * latin1. Also set the defaults for when 'nocompatible' is
3404 * set. */
3405 set_string_option_direct((char_u *)"isp", -1,
3406 ISP_LATIN1, OPT_FREE, SID_NONE);
3407 set_string_option_direct((char_u *)"isk", -1,
3408 ISK_LATIN1, OPT_FREE, SID_NONE);
3409 opt_idx = findoption((char_u *)"isp");
3410 if (opt_idx >= 0)
3411 options[opt_idx].def_val[VIM_DEFAULT] = ISP_LATIN1;
3412 opt_idx = findoption((char_u *)"isk");
3413 if (opt_idx >= 0)
3414 options[opt_idx].def_val[VIM_DEFAULT] = ISK_LATIN1;
3415 (void)init_chartab();
3416 }
3417 #endif
3418
3419 # if defined(WIN3264) && !defined(FEAT_GUI)
3420 /* Win32 console: When GetACP() returns a different value from
3421 * GetConsoleCP() set 'termencoding'. */
3422 if (GetACP() != GetConsoleCP())
3423 {
3424 char buf[50];
3425
3426 sprintf(buf, "cp%ld", (long)GetConsoleCP());
3427 p_tenc = vim_strsave((char_u *)buf);
3428 if (p_tenc != NULL)
3429 {
3430 opt_idx = findoption((char_u *)"termencoding");
3431 if (opt_idx >= 0)
3432 {
3433 options[opt_idx].def_val[VI_DEFAULT] = p_tenc;
3434 options[opt_idx].flags |= P_DEF_ALLOCED;
3435 }
3436 convert_setup(&input_conv, p_tenc, p_enc);
3437 convert_setup(&output_conv, p_enc, p_tenc);
3438 }
3439 else
3440 p_tenc = empty_option;
3441 }
3442 # endif
3443 # if defined(WIN3264) && defined(FEAT_MBYTE)
3444 /* $HOME may have characters in active code page. */
3445 init_homedir();
3446 # endif
3447 }
3448 else
3449 {
3450 vim_free(p_enc);
3451 p_enc = save_enc;
3452 }
3453 }
3454 #endif
3455
3456 #ifdef FEAT_MULTI_LANG
3457 /* Set the default for 'helplang'. */
3458 set_helplang_default(get_mess_lang());
3459 #endif
3460 }
3461
3462 /*
3463 * Set an option to its default value.
3464 * This does not take care of side effects!
3465 */
3466 static void
3467 set_option_default(opt_idx, opt_flags, compatible)
3468 int opt_idx;
3469 int opt_flags; /* OPT_FREE, OPT_LOCAL and/or OPT_GLOBAL */
3470 int compatible; /* use Vi default value */
3471 {
3472 char_u *varp; /* pointer to variable for current option */
3473 int dvi; /* index in def_val[] */
3474 long_u flags;
3475 long_u *flagsp;
3476 int both = (opt_flags & (OPT_LOCAL | OPT_GLOBAL)) == 0;
3477
3478 varp = get_varp_scope(&(options[opt_idx]), both ? OPT_LOCAL : opt_flags);
3479 flags = options[opt_idx].flags;
3480 if (varp != NULL) /* skip hidden option, nothing to do for it */
3481 {
3482 dvi = ((flags & P_VI_DEF) || compatible) ? VI_DEFAULT : VIM_DEFAULT;
3483 if (flags & P_STRING)
3484 {
3485 /* Use set_string_option_direct() for local options to handle
3486 * freeing and allocating the value. */
3487 if (options[opt_idx].indir != PV_NONE)
3488 set_string_option_direct(NULL, opt_idx,
3489 options[opt_idx].def_val[dvi], opt_flags, 0);
3490 else
3491 {
3492 if ((opt_flags & OPT_FREE) && (flags & P_ALLOCED))
3493 free_string_option(*(char_u **)(varp));
3494 *(char_u **)varp = options[opt_idx].def_val[dvi];
3495 options[opt_idx].flags &= ~P_ALLOCED;
3496 }
3497 }
3498 else if (flags & P_NUM)
3499 {
3500 if (options[opt_idx].indir == PV_SCROLL)
3501 win_comp_scroll(curwin);
3502 else
3503 {
3504 *(long *)varp = (long)(long_i)options[opt_idx].def_val[dvi];
3505 /* May also set global value for local option. */
3506 if (both)
3507 *(long *)get_varp_scope(&(options[opt_idx]), OPT_GLOBAL) =
3508 *(long *)varp;
3509 }
3510 }
3511 else /* P_BOOL */
3512 {
3513 /* the cast to long is required for Manx C, long_i is needed for
3514 * MSVC */
3515 *(int *)varp = (int)(long)(long_i)options[opt_idx].def_val[dvi];
3516 #ifdef UNIX
3517 /* 'modeline' defaults to off for root */
3518 if (options[opt_idx].indir == PV_ML && getuid() == ROOT_UID)
3519 *(int *)varp = FALSE;
3520 #endif
3521 /* May also set global value for local option. */
3522 if (both)
3523 *(int *)get_varp_scope(&(options[opt_idx]), OPT_GLOBAL) =
3524 *(int *)varp;
3525 }
3526
3527 /* The default value is not insecure. */
3528 flagsp = insecure_flag(opt_idx, opt_flags);
3529 *flagsp = *flagsp & ~P_INSECURE;
3530 }
3531
3532 #ifdef FEAT_EVAL
3533 set_option_scriptID_idx(opt_idx, opt_flags, current_SID);
3534 #endif
3535 }
3536
3537 /*
3538 * Set all options (except terminal options) to their default value.
3539 */
3540 static void
3541 set_options_default(opt_flags)
3542 int opt_flags; /* OPT_FREE, OPT_LOCAL and/or OPT_GLOBAL */
3543 {
3544 int i;
3545 #ifdef FEAT_WINDOWS
3546 win_T *wp;
3547 tabpage_T *tp;
3548 #endif
3549
3550 for (i = 0; !istermoption(&options[i]); i++)
3551 if (!(options[i].flags & P_NODEFAULT))
3552 set_option_default(i, opt_flags, p_cp);
3553
3554 #ifdef FEAT_WINDOWS
3555 /* The 'scroll' option must be computed for all windows. */
3556 FOR_ALL_TAB_WINDOWS(tp, wp)
3557 win_comp_scroll(wp);
3558 #else
3559 win_comp_scroll(curwin);
3560 #endif
3561 }
3562
3563 /*
3564 * Set the Vi-default value of a string option.
3565 * Used for 'sh', 'backupskip' and 'term'.
3566 */
3567 void
3568 set_string_default(name, val)
3569 char *name;
3570 char_u *val;
3571 {
3572 char_u *p;
3573 int opt_idx;
3574
3575 p = vim_strsave(val);
3576 if (p != NULL) /* we don't want a NULL */
3577 {
3578 opt_idx = findoption((char_u *)name);
3579 if (opt_idx >= 0)
3580 {
3581 if (options[opt_idx].flags & P_DEF_ALLOCED)
3582 vim_free(options[opt_idx].def_val[VI_DEFAULT]);
3583 options[opt_idx].def_val[VI_DEFAULT] = p;
3584 options[opt_idx].flags |= P_DEF_ALLOCED;
3585 }
3586 }
3587 }
3588
3589 /*
3590 * Set the Vi-default value of a number option.
3591 * Used for 'lines' and 'columns'.
3592 */
3593 void
3594 set_number_default(name, val)
3595 char *name;
3596 long val;
3597 {
3598 int opt_idx;
3599
3600 opt_idx = findoption((char_u *)name);
3601 if (opt_idx >= 0)
3602 options[opt_idx].def_val[VI_DEFAULT] = (char_u *)(long_i)val;
3603 }
3604
3605 #if defined(EXITFREE) || defined(PROTO)
3606 /*
3607 * Free all options.
3608 */
3609 void
3610 free_all_options()
3611 {
3612 int i;
3613
3614 for (i = 0; !istermoption(&options[i]); i++)
3615 {
3616 if (options[i].indir == PV_NONE)
3617 {
3618 /* global option: free value and default value. */
3619 if (options[i].flags & P_ALLOCED && options[i].var != NULL)
3620 free_string_option(*(char_u **)options[i].var);
3621 if (options[i].flags & P_DEF_ALLOCED)
3622 free_string_option(options[i].def_val[VI_DEFAULT]);
3623 }
3624 else if (options[i].var != VAR_WIN
3625 && (options[i].flags & P_STRING))
3626 /* buffer-local option: free global value */
3627 free_string_option(*(char_u **)options[i].var);
3628 }
3629 }
3630 #endif
3631
3632
3633 /*
3634 * Initialize the options, part two: After getting Rows and Columns and
3635 * setting 'term'.
3636 */
3637 void
3638 set_init_2()
3639 {
3640 int idx;
3641
3642 /*
3643 * 'scroll' defaults to half the window height. Note that this default is
3644 * wrong when the window height changes.
3645 */
3646 set_number_default("scroll", (long)((long_u)Rows >> 1));
3647 idx = findoption((char_u *)"scroll");
3648 if (idx >= 0 && !(options[idx].flags & P_WAS_SET))
3649 set_option_default(idx, OPT_LOCAL, p_cp);
3650 comp_col();
3651
3652 /*
3653 * 'window' is only for backwards compatibility with Vi.
3654 * Default is Rows - 1.
3655 */
3656 if (!option_was_set((char_u *)"window"))
3657 p_window = Rows - 1;
3658 set_number_default("window", Rows - 1);
3659
3660 /* For DOS console the default is always black. */
3661 #if !((defined(MSDOS) || defined(OS2) || defined(WIN3264)) && !defined(FEAT_GUI))
3662 /*
3663 * If 'background' wasn't set by the user, try guessing the value,
3664 * depending on the terminal name. Only need to check for terminals
3665 * with a dark background, that can handle color.
3666 */
3667 idx = findoption((char_u *)"bg");
3668 if (idx >= 0 && !(options[idx].flags & P_WAS_SET)
3669 && *term_bg_default() == 'd')
3670 {
3671 set_string_option_direct(NULL, idx, (char_u *)"dark", OPT_FREE, 0);
3672 /* don't mark it as set, when starting the GUI it may be
3673 * changed again */
3674 options[idx].flags &= ~P_WAS_SET;
3675 }
3676 #endif
3677
3678 #ifdef CURSOR_SHAPE
3679 parse_shape_opt(SHAPE_CURSOR); /* set cursor shapes from 'guicursor' */
3680 #endif
3681 #ifdef FEAT_MOUSESHAPE
3682 parse_shape_opt(SHAPE_MOUSE); /* set mouse shapes from 'mouseshape' */
3683 #endif
3684 #ifdef FEAT_PRINTER
3685 (void)parse_printoptions(); /* parse 'printoptions' default value */
3686 #endif
3687 }
3688
3689 /*
3690 * Return "dark" or "light" depending on the kind of terminal.
3691 * This is just guessing! Recognized are:
3692 * "linux" Linux console
3693 * "screen.linux" Linux console with screen
3694 * "cygwin" Cygwin shell
3695 * "putty" Putty program
3696 * We also check the COLORFGBG environment variable, which is set by
3697 * rxvt and derivatives. This variable contains either two or three
3698 * values separated by semicolons; we want the last value in either
3699 * case. If this value is 0-6 or 8, our background is dark.
3700 */
3701 static char_u *
3702 term_bg_default()
3703 {
3704 #if defined(MSDOS) || defined(OS2) || defined(WIN3264)
3705 /* DOS console nearly always black */
3706 return (char_u *)"dark";
3707 #else
3708 char_u *p;
3709
3710 if (STRCMP(T_NAME, "linux") == 0
3711 || STRCMP(T_NAME, "screen.linux") == 0
3712 || STRCMP(T_NAME, "cygwin") == 0
3713 || STRCMP(T_NAME, "putty") == 0
3714 || ((p = mch_getenv((char_u *)"COLORFGBG")) != NULL
3715 && (p = vim_strrchr(p, ';')) != NULL
3716 && ((p[1] >= '0' && p[1] <= '6') || p[1] == '8')
3717 && p[2] == NUL))
3718 return (char_u *)"dark";
3719 return (char_u *)"light";
3720 #endif
3721 }
3722
3723 /*
3724 * Initialize the options, part three: After reading the .vimrc
3725 */
3726 void
3727 set_init_3()
3728 {
3729 #if defined(UNIX) || defined(OS2) || defined(WIN3264)
3730 /*
3731 * Set 'shellpipe' and 'shellredir', depending on the 'shell' option.
3732 * This is done after other initializations, where 'shell' might have been
3733 * set, but only if they have not been set before.
3734 */
3735 char_u *p;
3736 int idx_srr;
3737 int do_srr;
3738 #ifdef FEAT_QUICKFIX
3739 int idx_sp;
3740 int do_sp;
3741 #endif
3742
3743 idx_srr = findoption((char_u *)"srr");
3744 if (idx_srr < 0)
3745 do_srr = FALSE;
3746 else
3747 do_srr = !(options[idx_srr].flags & P_WAS_SET);
3748 #ifdef FEAT_QUICKFIX
3749 idx_sp = findoption((char_u *)"sp");
3750 if (idx_sp < 0)
3751 do_sp = FALSE;
3752 else
3753 do_sp = !(options[idx_sp].flags & P_WAS_SET);
3754 #endif
3755
3756 /*
3757 * Isolate the name of the shell:
3758 * - Skip beyond any path. E.g., "/usr/bin/csh -f" -> "csh -f".
3759 * - Remove any argument. E.g., "csh -f" -> "csh".
3760 */
3761 p = gettail(p_sh);
3762 p = vim_strnsave(p, (int)(skiptowhite(p) - p));
3763 if (p != NULL)
3764 {
3765 /*
3766 * Default for p_sp is "| tee", for p_srr is ">".
3767 * For known shells it is changed here to include stderr.
3768 */
3769 if ( fnamecmp(p, "csh") == 0
3770 || fnamecmp(p, "tcsh") == 0
3771 # if defined(OS2) || defined(WIN3264) /* also check with .exe extension */
3772 || fnamecmp(p, "csh.exe") == 0
3773 || fnamecmp(p, "tcsh.exe") == 0
3774 # endif
3775 )
3776 {
3777 #if defined(FEAT_QUICKFIX)
3778 if (do_sp)
3779 {
3780 # ifdef WIN3264
3781 p_sp = (char_u *)">&";
3782 # else
3783 p_sp = (char_u *)"|& tee";
3784 # endif
3785 options[idx_sp].def_val[VI_DEFAULT] = p_sp;
3786 }
3787 #endif
3788 if (do_srr)
3789 {
3790 p_srr = (char_u *)">&";
3791 options[idx_srr].def_val[VI_DEFAULT] = p_srr;
3792 }
3793 }
3794 else
3795 # ifndef OS2 /* Always use bourne shell style redirection if we reach this */
3796 if ( fnamecmp(p, "sh") == 0
3797 || fnamecmp(p, "ksh") == 0
3798 || fnamecmp(p, "zsh") == 0
3799 || fnamecmp(p, "zsh-beta") == 0
3800 || fnamecmp(p, "bash") == 0
3801 # ifdef WIN3264
3802 || fnamecmp(p, "cmd") == 0
3803 || fnamecmp(p, "sh.exe") == 0
3804 || fnamecmp(p, "ksh.exe") == 0
3805 || fnamecmp(p, "zsh.exe") == 0
3806 || fnamecmp(p, "zsh-beta.exe") == 0
3807 || fnamecmp(p, "bash.exe") == 0
3808 || fnamecmp(p, "cmd.exe") == 0
3809 # endif
3810 )
3811 # endif
3812 {
3813 #if defined(FEAT_QUICKFIX)
3814 if (do_sp)
3815 {
3816 # ifdef WIN3264
3817 p_sp = (char_u *)">%s 2>&1";
3818 # else
3819 p_sp = (char_u *)"2>&1| tee";
3820 # endif
3821 options[idx_sp].def_val[VI_DEFAULT] = p_sp;
3822 }
3823 #endif
3824 if (do_srr)
3825 {
3826 p_srr = (char_u *)">%s 2>&1";
3827 options[idx_srr].def_val[VI_DEFAULT] = p_srr;
3828 }
3829 }
3830 vim_free(p);
3831 }
3832 #endif
3833
3834 #if defined(MSDOS) || defined(WIN3264) || defined(OS2)
3835 /*
3836 * Set 'shellcmdflag and 'shellquote' depending on the 'shell' option.
3837 * This is done after other initializations, where 'shell' might have been
3838 * set, but only if they have not been set before. Default for p_shcf is
3839 * "/c", for p_shq is "". For "sh" like shells it is changed here to
3840 * "-c" and "\"", but not for DJGPP, because it starts the shell without
3841 * command.com. And for Win32 we need to set p_sxq instead.
3842 */
3843 if (strstr((char *)gettail(p_sh), "sh") != NULL)
3844 {
3845 int idx3;
3846
3847 idx3 = findoption((char_u *)"shcf");
3848 if (idx3 >= 0 && !(options[idx3].flags & P_WAS_SET))
3849 {
3850 p_shcf = (char_u *)"-c";
3851 options[idx3].def_val[VI_DEFAULT] = p_shcf;
3852 }
3853
3854 # ifndef DJGPP
3855 # ifdef WIN3264
3856 /* Somehow Win32 requires the quotes around the redirection too */
3857 idx3 = findoption((char_u *)"sxq");
3858 if (idx3 >= 0 && !(options[idx3].flags & P_WAS_SET))
3859 {
3860 p_sxq = (char_u *)"\"";
3861 options[idx3].def_val[VI_DEFAULT] = p_sxq;
3862 }
3863 # else
3864 idx3 = findoption((char_u *)"shq");
3865 if (idx3 >= 0 && !(options[idx3].flags & P_WAS_SET))
3866 {
3867 p_shq = (char_u *)"\"";
3868 options[idx3].def_val[VI_DEFAULT] = p_shq;
3869 }
3870 # endif
3871 # endif
3872 }
3873 #endif
3874
3875 #ifdef FEAT_TITLE
3876 set_title_defaults();
3877 #endif
3878 }
3879
3880 #if defined(FEAT_MULTI_LANG) || defined(PROTO)
3881 /*
3882 * When 'helplang' is still at its default value, set it to "lang".
3883 * Only the first two characters of "lang" are used.
3884 */
3885 void
3886 set_helplang_default(lang)
3887 char_u *lang;
3888 {
3889 int idx;
3890
3891 if (lang == NULL || STRLEN(lang) < 2) /* safety check */
3892 return;
3893 idx = findoption((char_u *)"hlg");
3894 if (idx >= 0 && !(options[idx].flags & P_WAS_SET))
3895 {
3896 if (options[idx].flags & P_ALLOCED)
3897 free_string_option(p_hlg);
3898 p_hlg = vim_strsave(lang);
3899 if (p_hlg == NULL)
3900 p_hlg = empty_option;
3901 else
3902 {
3903 /* zh_CN becomes "cn", zh_TW becomes "tw". */
3904 if (STRNICMP(p_hlg, "zh_", 3) == 0 && STRLEN(p_hlg) >= 5)
3905 {
3906 p_hlg[0] = TOLOWER_ASC(p_hlg[3]);
3907 p_hlg[1] = TOLOWER_ASC(p_hlg[4]);
3908 }
3909 p_hlg[2] = NUL;
3910 }
3911 options[idx].flags |= P_ALLOCED;
3912 }
3913 }
3914 #endif
3915
3916 #ifdef FEAT_GUI
3917 static char_u *gui_bg_default __ARGS((void));
3918
3919 static char_u *
3920 gui_bg_default()
3921 {
3922 if (gui_get_lightness(gui.back_pixel) < 127)
3923 return (char_u *)"dark";
3924 return (char_u *)"light";
3925 }
3926
3927 /*
3928 * Option initializations that can only be done after opening the GUI window.
3929 */
3930 void
3931 init_gui_options()
3932 {
3933 /* Set the 'background' option according to the lightness of the
3934 * background color, unless the user has set it already. */
3935 if (!option_was_set((char_u *)"bg") && STRCMP(p_bg, gui_bg_default()) != 0)
3936 {
3937 set_option_value((char_u *)"bg", 0L, gui_bg_default(), 0);
3938 highlight_changed();
3939 }
3940 }
3941 #endif
3942
3943 #ifdef FEAT_TITLE
3944 /*
3945 * 'title' and 'icon' only default to true if they have not been set or reset
3946 * in .vimrc and we can read the old value.
3947 * When 'title' and 'icon' have been reset in .vimrc, we won't even check if
3948 * they can be reset. This reduces startup time when using X on a remote
3949 * machine.
3950 */
3951 void
3952 set_title_defaults()
3953 {
3954 int idx1;
3955 long val;
3956
3957 /*
3958 * If GUI is (going to be) used, we can always set the window title and
3959 * icon name. Saves a bit of time, because the X11 display server does
3960 * not need to be contacted.
3961 */
3962 idx1 = findoption((char_u *)"title");
3963 if (idx1 >= 0 && !(options[idx1].flags & P_WAS_SET))
3964 {
3965 #ifdef FEAT_GUI
3966 if (gui.starting || gui.in_use)
3967 val = TRUE;
3968 else
3969 #endif
3970 val = mch_can_restore_title();
3971 options[idx1].def_val[VI_DEFAULT] = (char_u *)(long_i)val;
3972 p_title = val;
3973 }
3974 idx1 = findoption((char_u *)"icon");
3975 if (idx1 >= 0 && !(options[idx1].flags & P_WAS_SET))
3976 {
3977 #ifdef FEAT_GUI
3978 if (gui.starting || gui.in_use)
3979 val = TRUE;
3980 else
3981 #endif
3982 val = mch_can_restore_icon();
3983 options[idx1].def_val[VI_DEFAULT] = (char_u *)(long_i)val;
3984 p_icon = val;
3985 }
3986 }
3987 #endif
3988
3989 /*
3990 * Parse 'arg' for option settings.
3991 *
3992 * 'arg' may be IObuff, but only when no errors can be present and option
3993 * does not need to be expanded with option_expand().
3994 * "opt_flags":
3995 * 0 for ":set"
3996 * OPT_GLOBAL for ":setglobal"
3997 * OPT_LOCAL for ":setlocal" and a modeline
3998 * OPT_MODELINE for a modeline
3999 * OPT_WINONLY to only set window-local options
4000 * OPT_NOWIN to skip setting window-local options
4001 *
4002 * returns FAIL if an error is detected, OK otherwise
4003 */
4004 int
4005 do_set(arg, opt_flags)
4006 char_u *arg; /* option string (may be written to!) */
4007 int opt_flags;
4008 {
4009 int opt_idx;
4010 char_u *errmsg;
4011 char_u errbuf[80];
4012 char_u *startarg;
4013 int prefix; /* 1: nothing, 0: "no", 2: "inv" in front of name */
4014 int nextchar; /* next non-white char after option name */
4015 int afterchar; /* character just after option name */
4016 int len;
4017 int i;
4018 long value;
4019 int key;
4020 long_u flags; /* flags for current option */
4021 char_u *varp = NULL; /* pointer to variable for current option */
4022 int did_show = FALSE; /* already showed one value */
4023 int adding; /* "opt+=arg" */
4024 int prepending; /* "opt^=arg" */
4025 int removing; /* "opt-=arg" */
4026 int cp_val = 0;
4027 char_u key_name[2];
4028
4029 if (*arg == NUL)
4030 {
4031 showoptions(0, opt_flags);
4032 did_show = TRUE;
4033 goto theend;
4034 }
4035
4036 while (*arg != NUL) /* loop to process all options */
4037 {
4038 errmsg = NULL;
4039 startarg = arg; /* remember for error message */
4040
4041 if (STRNCMP(arg, "all", 3) == 0 && !isalpha(arg[3])
4042 && !(opt_flags & OPT_MODELINE))
4043 {
4044 /*
4045 * ":set all" show all options.
4046 * ":set all&" set all options to their default value.
4047 */
4048 arg += 3;
4049 if (*arg == '&')
4050 {
4051 ++arg;
4052 /* Only for :set command set global value of local options. */
4053 set_options_default(OPT_FREE | opt_flags);
4054 }
4055 else
4056 {
4057 showoptions(1, opt_flags);
4058 did_show = TRUE;
4059 }
4060 }
4061 else if (STRNCMP(arg, "termcap", 7) == 0 && !(opt_flags & OPT_MODELINE))
4062 {
4063 showoptions(2, opt_flags);
4064 show_termcodes();
4065 did_show = TRUE;
4066 arg += 7;
4067 }
4068 else
4069 {
4070 prefix = 1;
4071 if (STRNCMP(arg, "no", 2) == 0 && STRNCMP(arg, "novice", 6) != 0)
4072 {
4073 prefix = 0;
4074 arg += 2;
4075 }
4076 else if (STRNCMP(arg, "inv", 3) == 0)
4077 {
4078 prefix = 2;
4079 arg += 3;
4080 }
4081
4082 /* find end of name */
4083 key = 0;
4084 if (*arg == '<')
4085 {
4086 nextchar = 0;
4087 opt_idx = -1;
4088 /* look out for <t_>;> */
4089 if (arg[1] == 't' && arg[2] == '_' && arg[3] && arg[4])
4090 len = 5;
4091 else
4092 {
4093 len = 1;
4094 while (arg[len] != NUL && arg[len] != '>')
4095 ++len;
4096 }
4097 if (arg[len] != '>')
4098 {
4099 errmsg = e_invarg;
4100 goto skip;
4101 }
4102 arg[len] = NUL; /* put NUL after name */
4103 if (arg[1] == 't' && arg[2] == '_') /* could be term code */
4104 opt_idx = findoption(arg + 1);
4105 arg[len++] = '>'; /* restore '>' */
4106 if (opt_idx == -1)
4107 key = find_key_option(arg + 1);
4108 }
4109 else
4110 {
4111 len = 0;
4112 /*
4113 * The two characters after "t_" may not be alphanumeric.
4114 */
4115 if (arg[0] == 't' && arg[1] == '_' && arg[2] && arg[3])
4116 len = 4;
4117 else
4118 while (ASCII_ISALNUM(arg[len]) || arg[len] == '_')
4119 ++len;
4120 nextchar = arg[len];
4121 arg[len] = NUL; /* put NUL after name */
4122 opt_idx = findoption(arg);
4123 arg[len] = nextchar; /* restore nextchar */
4124 if (opt_idx == -1)
4125 key = find_key_option(arg);
4126 }
4127
4128 /* remember character after option name */
4129 afterchar = arg[len];
4130
4131 /* skip white space, allow ":set ai ?" */
4132 while (vim_iswhite(arg[len]))
4133 ++len;
4134
4135 adding = FALSE;
4136 prepending = FALSE;
4137 removing = FALSE;
4138 if (arg[len] != NUL && arg[len + 1] == '=')
4139 {
4140 if (arg[len] == '+')
4141 {
4142 adding = TRUE; /* "+=" */
4143 ++len;
4144 }
4145 else if (arg[len] == '^')
4146 {
4147 prepending = TRUE; /* "^=" */
4148 ++len;
4149 }
4150 else if (arg[len] == '-')
4151 {
4152 removing = TRUE; /* "-=" */
4153 ++len;
4154 }
4155 }
4156 nextchar = arg[len];
4157
4158 if (opt_idx == -1 && key == 0) /* found a mismatch: skip */
4159 {
4160 errmsg = (char_u *)N_("E518: Unknown option");
4161 goto skip;
4162 }
4163
4164 if (opt_idx >= 0)
4165 {
4166 if (options[opt_idx].var == NULL) /* hidden option: skip */
4167 {
4168 /* Only give an error message when requesting the value of
4169 * a hidden option, ignore setting it. */
4170 if (vim_strchr((char_u *)"=:!&<", nextchar) == NULL
4171 && (!(options[opt_idx].flags & P_BOOL)
4172 || nextchar == '?'))
4173 errmsg = (char_u *)N_("E519: Option not supported");
4174 goto skip;
4175 }
4176
4177 flags = options[opt_idx].flags;
4178 varp = get_varp_scope(&(options[opt_idx]), opt_flags);
4179 }
4180 else
4181 {
4182 flags = P_STRING;
4183 if (key < 0)
4184 {
4185 key_name[0] = KEY2TERMCAP0(key);
4186 key_name[1] = KEY2TERMCAP1(key);
4187 }
4188 else
4189 {
4190 key_name[0] = KS_KEY;
4191 key_name[1] = (key & 0xff);
4192 }
4193 }
4194
4195 /* Skip all options that are not window-local (used when showing
4196 * an already loaded buffer in a window). */
4197 if ((opt_flags & OPT_WINONLY)
4198 && (opt_idx < 0 || options[opt_idx].var != VAR_WIN))
4199 goto skip;
4200
4201 /* Skip all options that are window-local (used for :vimgrep). */
4202 if ((opt_flags & OPT_NOWIN) && opt_idx >= 0
4203 && options[opt_idx].var == VAR_WIN)
4204 goto skip;
4205
4206 /* Disallow changing some options from modelines. */
4207 if (opt_flags & OPT_MODELINE)
4208 {
4209 if (flags & P_SECURE)
4210 {
4211 errmsg = (char_u *)_("E520: Not allowed in a modeline");
4212 goto skip;
4213 }
4214 #ifdef FEAT_DIFF
4215 /* In diff mode some options are overruled. This avoids that
4216 * 'foldmethod' becomes "marker" instead of "diff" and that
4217 * "wrap" gets set. */
4218 if (curwin->w_p_diff
4219 && (options[opt_idx].indir == PV_FDM
4220 || options[opt_idx].indir == PV_WRAP))
4221 goto skip;
4222 #endif
4223 }
4224
4225 #ifdef HAVE_SANDBOX
4226 /* Disallow changing some options in the sandbox */
4227 if (sandbox != 0 && (flags & P_SECURE))
4228 {
4229 errmsg = (char_u *)_(e_sandbox);
4230 goto skip;
4231 }
4232 #endif
4233
4234 if (vim_strchr((char_u *)"?=:!&<", nextchar) != NULL)
4235 {
4236 arg += len;
4237 cp_val = p_cp;
4238 if (nextchar == '&' && arg[1] == 'v' && arg[2] == 'i')
4239 {
4240 if (arg[3] == 'm') /* "opt&vim": set to Vim default */
4241 {
4242 cp_val = FALSE;
4243 arg += 3;
4244 }
4245 else /* "opt&vi": set to Vi default */
4246 {
4247 cp_val = TRUE;
4248 arg += 2;
4249 }
4250 }
4251 if (vim_strchr((char_u *)"?!&<", nextchar) != NULL
4252 && arg[1] != NUL && !vim_iswhite(arg[1]))
4253 {
4254 errmsg = e_trailing;
4255 goto skip;
4256 }
4257 }
4258
4259 /*
4260 * allow '=' and ':' as MSDOS command.com allows only one
4261 * '=' character per "set" command line. grrr. (jw)
4262 */
4263 if (nextchar == '?'
4264 || (prefix == 1
4265 && vim_strchr((char_u *)"=:&<", nextchar) == NULL
4266 && !(flags & P_BOOL)))
4267 {
4268 /*
4269 * print value
4270 */
4271 if (did_show)
4272 msg_putchar('\n'); /* cursor below last one */
4273 else
4274 {
4275 gotocmdline(TRUE); /* cursor at status line */
4276 did_show = TRUE; /* remember that we did a line */
4277 }
4278 if (opt_idx >= 0)
4279 {
4280 showoneopt(&options[opt_idx], opt_flags);
4281 #ifdef FEAT_EVAL
4282 if (p_verbose > 0)
4283 {
4284 /* Mention where the option was last set. */
4285 if (varp == options[opt_idx].var)
4286 last_set_msg(options[opt_idx].scriptID);
4287 else if ((int)options[opt_idx].indir & PV_WIN)
4288 last_set_msg(curwin->w_p_scriptID[
4289 (int)options[opt_idx].indir & PV_MASK]);
4290 else if ((int)options[opt_idx].indir & PV_BUF)
4291 last_set_msg(curbuf->b_p_scriptID[
4292 (int)options[opt_idx].indir & PV_MASK]);
4293 }
4294 #endif
4295 }
4296 else
4297 {
4298 char_u *p;
4299
4300 p = find_termcode(key_name);
4301 if (p == NULL)
4302 {
4303 errmsg = (char_u *)N_("E518: Unknown option");
4304 goto skip;
4305 }
4306 else
4307 (void)show_one_termcode(key_name, p, TRUE);
4308 }
4309 if (nextchar != '?'
4310 && nextchar != NUL && !vim_iswhite(afterchar))
4311 errmsg = e_trailing;
4312 }
4313 else
4314 {
4315 if (flags & P_BOOL) /* boolean */
4316 {
4317 if (nextchar == '=' || nextchar == ':')
4318 {
4319 errmsg = e_invarg;
4320 goto skip;
4321 }
4322
4323 /*
4324 * ":set opt!": invert
4325 * ":set opt&": reset to default value
4326 * ":set opt<": reset to global value
4327 */
4328 if (nextchar == '!')
4329 value = *(int *)(varp) ^ 1;
4330 else if (nextchar == '&')
4331 value = (int)(long)(long_i)options[opt_idx].def_val[
4332 ((flags & P_VI_DEF) || cp_val)
4333 ? VI_DEFAULT : VIM_DEFAULT];
4334 else if (nextchar == '<')
4335 {
4336 /* For 'autoread' -1 means to use global value. */
4337 if ((int *)varp == &curbuf->b_p_ar
4338 && opt_flags == OPT_LOCAL)
4339 value = -1;
4340 else
4341 value = *(int *)get_varp_scope(&(options[opt_idx]),
4342 OPT_GLOBAL);
4343 }
4344 else
4345 {
4346 /*
4347 * ":set invopt": invert
4348 * ":set opt" or ":set noopt": set or reset
4349 */
4350 if (nextchar != NUL && !vim_iswhite(afterchar))
4351 {
4352 errmsg = e_trailing;
4353 goto skip;
4354 }
4355 if (prefix == 2) /* inv */
4356 value = *(int *)(varp) ^ 1;
4357 else
4358 value = prefix;
4359 }
4360
4361 errmsg = set_bool_option(opt_idx, varp, (int)value,
4362 opt_flags);
4363 }
4364 else /* numeric or string */
4365 {
4366 if (vim_strchr((char_u *)"=:&<", nextchar) == NULL
4367 || prefix != 1)
4368 {
4369 errmsg = e_invarg;
4370 goto skip;
4371 }
4372
4373 if (flags & P_NUM) /* numeric */
4374 {
4375 /*
4376 * Different ways to set a number option:
4377 * & set to default value
4378 * < set to global value
4379 * <xx> accept special key codes for 'wildchar'
4380 * c accept any non-digit for 'wildchar'
4381 * [-]0-9 set number
4382 * other error
4383 */
4384 ++arg;
4385 if (nextchar == '&')
4386 value = (long)(long_i)options[opt_idx].def_val[
4387 ((flags & P_VI_DEF) || cp_val)
4388 ? VI_DEFAULT : VIM_DEFAULT];
4389 else if (nextchar == '<')
4390 value = *(long *)get_varp_scope(&(options[opt_idx]),
4391 OPT_GLOBAL);
4392 else if (((long *)varp == &p_wc
4393 || (long *)varp == &p_wcm)
4394 && (*arg == '<'
4395 || *arg == '^'
4396 || ((!arg[1] || vim_iswhite(arg[1]))
4397 && !VIM_ISDIGIT(*arg))))
4398 {
4399 value = string_to_key(arg);
4400 if (value == 0 && (long *)varp != &p_wcm)
4401 {
4402 errmsg = e_invarg;
4403 goto skip;
4404 }
4405 }
4406 /* allow negative numbers (for 'undolevels') */
4407 else if (*arg == '-' || VIM_ISDIGIT(*arg))
4408 {
4409 i = 0;
4410 if (*arg == '-')
4411 i = 1;
4412 #ifdef HAVE_STRTOL
4413 value = strtol((char *)arg, NULL, 0);
4414 if (arg[i] == '0' && TOLOWER_ASC(arg[i + 1]) == 'x')
4415 i += 2;
4416 #else
4417 value = atol((char *)arg);
4418 #endif
4419 while (VIM_ISDIGIT(arg[i]))
4420 ++i;
4421 if (arg[i] != NUL && !vim_iswhite(arg[i]))
4422 {
4423 errmsg = e_invarg;
4424 goto skip;
4425 }
4426 }
4427 else
4428 {
4429 errmsg = (char_u *)N_("E521: Number required after =");
4430 goto skip;
4431 }
4432
4433 if (adding)
4434 value = *(long *)varp + value;
4435 if (prepending)
4436 value = *(long *)varp * value;
4437 if (removing)
4438 value = *(long *)varp - value;
4439 errmsg = set_num_option(opt_idx, varp, value,
4440 errbuf, sizeof(errbuf), opt_flags);
4441 }
4442 else if (opt_idx >= 0) /* string */
4443 {
4444 char_u *save_arg = NULL;
4445 char_u *s = NULL;
4446 char_u *oldval; /* previous value if *varp */
4447 char_u *newval;
4448 char_u *origval;
4449 unsigned newlen;
4450 int comma;
4451 int bs;
4452 int new_value_alloced; /* new string option
4453 was allocated */
4454
4455 /* When using ":set opt=val" for a global option
4456 * with a local value the local value will be
4457 * reset, use the global value here. */
4458 if ((opt_flags & (OPT_LOCAL | OPT_GLOBAL)) == 0
4459 && ((int)options[opt_idx].indir & PV_BOTH))
4460 varp = options[opt_idx].var;
4461
4462 /* The old value is kept until we are sure that the
4463 * new value is valid. */
4464 oldval = *(char_u **)varp;
4465 if (nextchar == '&') /* set to default val */
4466 {
4467 newval = options[opt_idx].def_val[
4468 ((flags & P_VI_DEF) || cp_val)
4469 ? VI_DEFAULT : VIM_DEFAULT];
4470 if ((char_u **)varp == &p_bg)
4471 {
4472 /* guess the value of 'background' */
4473 #ifdef FEAT_GUI
4474 if (gui.in_use)
4475 newval = gui_bg_default();
4476 else
4477 #endif
4478 newval = term_bg_default();
4479 }
4480
4481 /* expand environment variables and ~ (since the
4482 * default value was already expanded, only
4483 * required when an environment variable was set
4484 * later */
4485 if (newval == NULL)
4486 newval = empty_option;
4487 else
4488 {
4489 s = option_expand(opt_idx, newval);
4490 if (s == NULL)
4491 s = newval;
4492 newval = vim_strsave(s);
4493 }
4494 new_value_alloced = TRUE;
4495 }
4496 else if (nextchar == '<') /* set to global val */
4497 {
4498 newval = vim_strsave(*(char_u **)get_varp_scope(
4499 &(options[opt_idx]), OPT_GLOBAL));
4500 new_value_alloced = TRUE;
4501 }
4502 else
4503 {
4504 ++arg; /* jump to after the '=' or ':' */
4505
4506 /*
4507 * Set 'keywordprg' to ":help" if an empty
4508 * value was passed to :set by the user.
4509 * Misuse errbuf[] for the resulting string.
4510 */
4511 if (varp == (char_u *)&p_kp
4512 && (*arg == NUL || *arg == ' '))
4513 {
4514 STRCPY(errbuf, ":help");
4515 save_arg = arg;
4516 arg = errbuf;
4517 }
4518 /*
4519 * Convert 'whichwrap' number to string, for
4520 * backwards compatibility with Vim 3.0.
4521 * Misuse errbuf[] for the resulting string.
4522 */
4523 else if (varp == (char_u *)&p_ww
4524 && VIM_ISDIGIT(*arg))
4525 {
4526 *errbuf = NUL;
4527 i = getdigits(&arg);
4528 if (i & 1)
4529 STRCAT(errbuf, "b,");
4530 if (i & 2)
4531 STRCAT(errbuf, "s,");
4532 if (i & 4)
4533 STRCAT(errbuf, "h,l,");
4534 if (i & 8)
4535 STRCAT(errbuf, "<,>,");
4536 if (i & 16)
4537 STRCAT(errbuf, "[,],");
4538 if (*errbuf != NUL) /* remove trailing , */
4539 errbuf[STRLEN(errbuf) - 1] = NUL;
4540 save_arg = arg;
4541 arg = errbuf;
4542 }
4543 /*
4544 * Remove '>' before 'dir' and 'bdir', for
4545 * backwards compatibility with version 3.0
4546 */
4547 else if ( *arg == '>'
4548 && (varp == (char_u *)&p_dir
4549 || varp == (char_u *)&p_bdir))
4550 {
4551 ++arg;
4552 }
4553
4554 /* When setting the local value of a global
4555 * option, the old value may be the global value. */
4556 if (((int)options[opt_idx].indir & PV_BOTH)
4557 && (opt_flags & OPT_LOCAL))
4558 origval = *(char_u **)get_varp(
4559 &options[opt_idx]);
4560 else
4561 origval = oldval;
4562
4563 /*
4564 * Copy the new string into allocated memory.
4565 * Can't use set_string_option_direct(), because
4566 * we need to remove the backslashes.
4567 */
4568 /* get a bit too much */
4569 newlen = (unsigned)STRLEN(arg) + 1;
4570 if (adding || prepending || removing)
4571 newlen += (unsigned)STRLEN(origval) + 1;
4572 newval = alloc(newlen);
4573 if (newval == NULL) /* out of mem, don't change */
4574 break;
4575 s = newval;
4576
4577 /*
4578 * Copy the string, skip over escaped chars.
4579 * For MS-DOS and WIN32 backslashes before normal
4580 * file name characters are not removed, and keep
4581 * backslash at start, for "\\machine\path", but
4582 * do remove it for "\\\\machine\\path".
4583 * The reverse is found in ExpandOldSetting().
4584 */
4585 while (*arg && !vim_iswhite(*arg))
4586 {
4587 if (*arg == '\\' && arg[1] != NUL
4588 #ifdef BACKSLASH_IN_FILENAME
4589 && !((flags & P_EXPAND)
4590 && vim_isfilec(arg[1])
4591 && (arg[1] != '\\'
4592 || (s == newval
4593 && arg[2] != '\\')))
4594 #endif
4595 )
4596 ++arg; /* remove backslash */
4597 #ifdef FEAT_MBYTE
4598 if (has_mbyte
4599 && (i = (*mb_ptr2len)(arg)) > 1)
4600 {
4601 /* copy multibyte char */
4602 mch_memmove(s, arg, (size_t)i);
4603 arg += i;
4604 s += i;
4605 }
4606 else
4607 #endif
4608 *s++ = *arg++;
4609 }
4610 *s = NUL;
4611
4612 /*
4613 * Expand environment variables and ~.
4614 * Don't do it when adding without inserting a
4615 * comma.
4616 */
4617 if (!(adding || prepending || removing)
4618 || (flags & P_COMMA))
4619 {
4620 s = option_expand(opt_idx, newval);
4621 if (s != NULL)
4622 {
4623 vim_free(newval);
4624 newlen = (unsigned)STRLEN(s) + 1;
4625 if (adding || prepending || removing)
4626 newlen += (unsigned)STRLEN(origval) + 1;
4627 newval = alloc(newlen);
4628 if (newval == NULL)
4629 break;
4630 STRCPY(newval, s);
4631 }
4632 }
4633
4634 /* locate newval[] in origval[] when removing it
4635 * and when adding to avoid duplicates */
4636 i = 0; /* init for GCC */
4637 if (removing || (flags & P_NODUP))
4638 {
4639 i = (int)STRLEN(newval);
4640 bs = 0;
4641 for (s = origval; *s; ++s)
4642 {
4643 if ((!(flags & P_COMMA)
4644 || s == origval
4645 || (s[-1] == ',' && !(bs & 1)))
4646 && STRNCMP(s, newval, i) == 0
4647 && (!(flags & P_COMMA)
4648 || s[i] == ','
4649 || s[i] == NUL))
4650 break;
4651 /* Count backspaces. Only a comma with an
4652 * even number of backspaces before it is
4653 * recognized as a separator */
4654 if (s > origval && s[-1] == '\\')
4655 ++bs;
4656 else
4657 bs = 0;
4658 }
4659
4660 /* do not add if already there */
4661 if ((adding || prepending) && *s)
4662 {
4663 prepending = FALSE;
4664 adding = FALSE;
4665 STRCPY(newval, origval);
4666 }
4667 }
4668
4669 /* concatenate the two strings; add a ',' if
4670 * needed */
4671 if (adding || prepending)
4672 {
4673 comma = ((flags & P_COMMA) && *origval != NUL
4674 && *newval != NUL);
4675 if (adding)
4676 {
4677 i = (int)STRLEN(origval);
4678 mch_memmove(newval + i + comma, newval,
4679 STRLEN(newval) + 1);
4680 mch_memmove(newval, origval, (size_t)i);
4681 }
4682 else
4683 {
4684 i = (int)STRLEN(newval);
4685 STRMOVE(newval + i + comma, origval);
4686 }
4687 if (comma)
4688 newval[i] = ',';
4689 }
4690
4691 /* Remove newval[] from origval[]. (Note: "i" has
4692 * been set above and is used here). */
4693 if (removing)
4694 {
4695 STRCPY(newval, origval);
4696 if (*s)
4697 {
4698 /* may need to remove a comma */
4699 if (flags & P_COMMA)
4700 {
4701 if (s == origval)
4702 {
4703 /* include comma after string */
4704 if (s[i] == ',')
4705 ++i;
4706 }
4707 else
4708 {
4709 /* include comma before string */
4710 --s;
4711 ++i;
4712 }
4713 }
4714 STRMOVE(newval + (s - origval), s + i);
4715 }
4716 }
4717
4718 if (flags & P_FLAGLIST)
4719 {
4720 /* Remove flags that appear twice. */
4721 for (s = newval; *s; ++s)
4722 if ((!(flags & P_COMMA) || *s != ',')
4723 && vim_strchr(s + 1, *s) != NULL)
4724 {
4725 STRMOVE(s, s + 1);
4726 --s;
4727 }
4728 }
4729
4730 if (save_arg != NULL) /* number for 'whichwrap' */
4731 arg = save_arg;
4732 new_value_alloced = TRUE;
4733 }
4734
4735 /* Set the new value. */
4736 *(char_u **)(varp) = newval;
4737
4738 /* Handle side effects, and set the global value for
4739 * ":set" on local options. */
4740 errmsg = did_set_string_option(opt_idx, (char_u **)varp,
4741 new_value_alloced, oldval, errbuf, opt_flags);
4742
4743 /* If error detected, print the error message. */
4744 if (errmsg != NULL)
4745 goto skip;
4746 }
4747 else /* key code option */
4748 {
4749 char_u *p;
4750
4751 if (nextchar == '&')
4752 {
4753 if (add_termcap_entry(key_name, TRUE) == FAIL)
4754 errmsg = (char_u *)N_("E522: Not found in termcap");
4755 }
4756 else
4757 {
4758 ++arg; /* jump to after the '=' or ':' */
4759 for (p = arg; *p && !vim_iswhite(*p); ++p)
4760 if (*p == '\\' && p[1] != NUL)
4761 ++p;
4762 nextchar = *p;
4763 *p = NUL;
4764 add_termcode(key_name, arg, FALSE);
4765 *p = nextchar;
4766 }
4767 if (full_screen)
4768 ttest(FALSE);
4769 redraw_all_later(CLEAR);
4770 }
4771 }
4772
4773 if (opt_idx >= 0)
4774 did_set_option(opt_idx, opt_flags,
4775 !prepending && !adding && !removing);
4776 }
4777
4778 skip:
4779 /*
4780 * Advance to next argument.
4781 * - skip until a blank found, taking care of backslashes
4782 * - skip blanks
4783 * - skip one "=val" argument (for hidden options ":set gfn =xx")
4784 */
4785 for (i = 0; i < 2 ; ++i)
4786 {
4787 while (*arg != NUL && !vim_iswhite(*arg))
4788 if (*arg++ == '\\' && *arg != NUL)
4789 ++arg;
4790 arg = skipwhite(arg);
4791 if (*arg != '=')
4792 break;
4793 }
4794 }
4795
4796 if (errmsg != NULL)
4797 {
4798 vim_strncpy(IObuff, (char_u *)_(errmsg), IOSIZE - 1);
4799 i = (int)STRLEN(IObuff) + 2;
4800 if (i + (arg - startarg) < IOSIZE)
4801 {
4802 /* append the argument with the error */
4803 STRCAT(IObuff, ": ");
4804 mch_memmove(IObuff + i, startarg, (arg - startarg));
4805 IObuff[i + (arg - startarg)] = NUL;
4806 }
4807 /* make sure all characters are printable */
4808 trans_characters(IObuff, IOSIZE);
4809
4810 ++no_wait_return; /* wait_return done later */
4811 emsg(IObuff); /* show error highlighted */
4812 --no_wait_return;
4813
4814 return FAIL;
4815 }
4816
4817 arg = skipwhite(arg);
4818 }
4819
4820 theend:
4821 if (silent_mode && did_show)
4822 {
4823 /* After displaying option values in silent mode. */
4824 silent_mode = FALSE;
4825 info_message = TRUE; /* use mch_msg(), not mch_errmsg() */
4826 msg_putchar('\n');
4827 cursor_on(); /* msg_start() switches it off */
4828 out_flush();
4829 silent_mode = TRUE;
4830 info_message = FALSE; /* use mch_msg(), not mch_errmsg() */
4831 }
4832
4833 return OK;
4834 }
4835
4836 /*
4837 * Call this when an option has been given a new value through a user command.
4838 * Sets the P_WAS_SET flag and takes care of the P_INSECURE flag.
4839 */
4840 static void
4841 did_set_option(opt_idx, opt_flags, new_value)
4842 int opt_idx;
4843 int opt_flags; /* possibly with OPT_MODELINE */
4844 int new_value; /* value was replaced completely */
4845 {
4846 long_u *p;
4847
4848 options[opt_idx].flags |= P_WAS_SET;
4849
4850 /* When an option is set in the sandbox, from a modeline or in secure mode
4851 * set the P_INSECURE flag. Otherwise, if a new value is stored reset the
4852 * flag. */
4853 p = insecure_flag(opt_idx, opt_flags);
4854 if (secure
4855 #ifdef HAVE_SANDBOX
4856 || sandbox != 0
4857 #endif
4858 || (opt_flags & OPT_MODELINE))
4859 *p = *p | P_INSECURE;
4860 else if (new_value)
4861 *p = *p & ~P_INSECURE;
4862 }
4863
4864 static char_u *
4865 illegal_char(errbuf, c)
4866 char_u *errbuf;
4867 int c;
4868 {
4869 if (errbuf == NULL)
4870 return (char_u *)"";
4871 sprintf((char *)errbuf, _("E539: Illegal character <%s>"),
4872 (char *)transchar(c));
4873 return errbuf;
4874 }
4875
4876 /*
4877 * Convert a key name or string into a key value.
4878 * Used for 'wildchar' and 'cedit' options.
4879 */
4880 static int
4881 string_to_key(arg)
4882 char_u *arg;
4883 {
4884 if (*arg == '<')
4885 return find_key_option(arg + 1);
4886 if (*arg == '^')
4887 return Ctrl_chr(arg[1]);
4888 return *arg;
4889 }
4890
4891 #ifdef FEAT_CMDWIN
4892 /*
4893 * Check value of 'cedit' and set cedit_key.
4894 * Returns NULL if value is OK, error message otherwise.
4895 */
4896 static char_u *
4897 check_cedit()
4898 {
4899 int n;
4900
4901 if (*p_cedit == NUL)
4902 cedit_key = -1;
4903 else
4904 {
4905 n = string_to_key(p_cedit);
4906 if (vim_isprintc(n))
4907 return e_invarg;
4908 cedit_key = n;
4909 }
4910 return NULL;
4911 }
4912 #endif
4913
4914 #ifdef FEAT_TITLE
4915 /*
4916 * When changing 'title', 'titlestring', 'icon' or 'iconstring', call
4917 * maketitle() to create and display it.
4918 * When switching the title or icon off, call mch_restore_title() to get
4919 * the old value back.
4920 */
4921 static void
4922 did_set_title(icon)
4923 int icon; /* Did set icon instead of title */
4924 {
4925 if (starting != NO_SCREEN
4926 #ifdef FEAT_GUI
4927 && !gui.starting
4928 #endif
4929 )
4930 {
4931 maketitle();
4932 if (icon)
4933 {
4934 if (!p_icon)
4935 mch_restore_title(2);
4936 }
4937 else
4938 {
4939 if (!p_title)
4940 mch_restore_title(1);
4941 }
4942 }
4943 }
4944 #endif
4945
4946 /*
4947 * set_options_bin - called when 'bin' changes value.
4948 */
4949 void
4950 set_options_bin(oldval, newval, opt_flags)
4951 int oldval;
4952 int newval;
4953 int opt_flags; /* OPT_LOCAL and/or OPT_GLOBAL */
4954 {
4955 /*
4956 * The option values that are changed when 'bin' changes are
4957 * copied when 'bin is set and restored when 'bin' is reset.
4958 */
4959 if (newval)
4960 {
4961 if (!oldval) /* switched on */
4962 {
4963 if (!(opt_flags & OPT_GLOBAL))
4964 {
4965 curbuf->b_p_tw_nobin = curbuf->b_p_tw;
4966 curbuf->b_p_wm_nobin = curbuf->b_p_wm;
4967 curbuf->b_p_ml_nobin = curbuf->b_p_ml;
4968 curbuf->b_p_et_nobin = curbuf->b_p_et;
4969 }
4970 if (!(opt_flags & OPT_LOCAL))
4971 {
4972 p_tw_nobin = p_tw;
4973 p_wm_nobin = p_wm;
4974 p_ml_nobin = p_ml;
4975 p_et_nobin = p_et;
4976 }
4977 }
4978
4979 if (!(opt_flags & OPT_GLOBAL))
4980 {
4981 curbuf->b_p_tw = 0; /* no automatic line wrap */
4982 curbuf->b_p_wm = 0; /* no automatic line wrap */
4983 curbuf->b_p_ml = 0; /* no modelines */
4984 curbuf->b_p_et = 0; /* no expandtab */
4985 }
4986 if (!(opt_flags & OPT_LOCAL))
4987 {
4988 p_tw = 0;
4989 p_wm = 0;
4990 p_ml = FALSE;
4991 p_et = FALSE;
4992 p_bin = TRUE; /* needed when called for the "-b" argument */
4993 }
4994 }
4995 else if (oldval) /* switched off */
4996 {
4997 if (!(opt_flags & OPT_GLOBAL))
4998 {
4999 curbuf->b_p_tw = curbuf->b_p_tw_nobin;
5000 curbuf->b_p_wm = curbuf->b_p_wm_nobin;
5001 curbuf->b_p_ml = curbuf->b_p_ml_nobin;
5002 curbuf->b_p_et = curbuf->b_p_et_nobin;
5003 }
5004 if (!(opt_flags & OPT_LOCAL))
5005 {
5006 p_tw = p_tw_nobin;
5007 p_wm = p_wm_nobin;
5008 p_ml = p_ml_nobin;
5009 p_et = p_et_nobin;
5010 }
5011 }
5012 }
5013
5014 #ifdef FEAT_VIMINFO
5015 /*
5016 * Find the parameter represented by the given character (eg ', :, ", or /),
5017 * and return its associated value in the 'viminfo' string.
5018 * Only works for number parameters, not for 'r' or 'n'.
5019 * If the parameter is not specified in the string or there is no following
5020 * number, return -1.
5021 */
5022 int
5023 get_viminfo_parameter(type)
5024 int type;
5025 {
5026 char_u *p;
5027
5028 p = find_viminfo_parameter(type);
5029 if (p != NULL && VIM_ISDIGIT(*p))
5030 return atoi((char *)p);
5031 return -1;
5032 }
5033
5034 /*
5035 * Find the parameter represented by the given character (eg ''', ':', '"', or
5036 * '/') in the 'viminfo' option and return a pointer to the string after it.
5037 * Return NULL if the parameter is not specified in the string.
5038 */
5039 char_u *
5040 find_viminfo_parameter(type)
5041 int type;
5042 {
5043 char_u *p;
5044
5045 for (p = p_viminfo; *p; ++p)
5046 {
5047 if (*p == type)
5048 return p + 1;
5049 if (*p == 'n') /* 'n' is always the last one */
5050 break;
5051 p = vim_strchr(p, ','); /* skip until next ',' */
5052 if (p == NULL) /* hit the end without finding parameter */
5053 break;
5054 }
5055 return NULL;
5056 }
5057 #endif
5058
5059 /*
5060 * Expand environment variables for some string options.
5061 * These string options cannot be indirect!
5062 * If "val" is NULL expand the current value of the option.
5063 * Return pointer to NameBuff, or NULL when not expanded.
5064 */
5065 static char_u *
5066 option_expand(opt_idx, val)
5067 int opt_idx;
5068 char_u *val;
5069 {
5070 /* if option doesn't need expansion nothing to do */
5071 if (!(options[opt_idx].flags & P_EXPAND) || options[opt_idx].var == NULL)
5072 return NULL;
5073
5074 /* If val is longer than MAXPATHL no meaningful expansion can be done,
5075 * expand_env() would truncate the string. */
5076 if (val != NULL && STRLEN(val) > MAXPATHL)
5077 return NULL;
5078
5079 if (val == NULL)
5080 val = *(char_u **)options[opt_idx].var;
5081
5082 /*
5083 * Expanding this with NameBuff, expand_env() must not be passed IObuff.
5084 * Escape spaces when expanding 'tags', they are used to separate file
5085 * names.
5086 * For 'spellsuggest' expand after "file:".
5087 */
5088 expand_env_esc(val, NameBuff, MAXPATHL,
5089 (char_u **)options[opt_idx].var == &p_tags, FALSE,
5090 #ifdef FEAT_SPELL
5091 (char_u **)options[opt_idx].var == &p_sps ? (char_u *)"file:" :
5092 #endif
5093 NULL);
5094 if (STRCMP(NameBuff, val) == 0) /* they are the same */
5095 return NULL;
5096
5097 return NameBuff;
5098 }
5099
5100 /*
5101 * After setting various option values: recompute variables that depend on
5102 * option values.
5103 */
5104 static void
5105 didset_options()
5106 {
5107 /* initialize the table for 'iskeyword' et.al. */
5108 (void)init_chartab();
5109
5110 #ifdef FEAT_MBYTE
5111 (void)opt_strings_flags(p_cmp, p_cmp_values, &cmp_flags, TRUE);
5112 #endif
5113 (void)opt_strings_flags(p_bkc, p_bkc_values, &bkc_flags, TRUE);
5114 #ifdef FEAT_SESSION
5115 (void)opt_strings_flags(p_ssop, p_ssop_values, &ssop_flags, TRUE);
5116 (void)opt_strings_flags(p_vop, p_ssop_values, &vop_flags, TRUE);
5117 #endif
5118 #ifdef FEAT_FOLDING
5119 (void)opt_strings_flags(p_fdo, p_fdo_values, &fdo_flags, TRUE);
5120 #endif
5121 #ifdef FEAT_FULLSCREEN
5122 (void)check_fuoptions(p_fuoptions, &fuoptions_flags,
5123 &fuoptions_bgcolor);
5124 #endif
5125 (void)opt_strings_flags(p_dy, p_dy_values, &dy_flags, TRUE);
5126 #ifdef FEAT_VIRTUALEDIT
5127 (void)opt_strings_flags(p_ve, p_ve_values, &ve_flags, TRUE);
5128 #endif
5129 #if defined(FEAT_MOUSE) && (defined(UNIX) || defined(VMS))
5130 (void)opt_strings_flags(p_ttym, p_ttym_values, &ttym_flags, FALSE);
5131 #endif
5132 #ifdef FEAT_SPELL
5133 (void)spell_check_msm();
5134 (void)spell_check_sps();
5135 (void)compile_cap_prog(curbuf);
5136 #endif
5137 #if defined(FEAT_TOOLBAR) && !defined(FEAT_GUI_W32)
5138 (void)opt_strings_flags(p_toolbar, p_toolbar_values, &toolbar_flags, TRUE);
5139 #endif
5140 #if defined(FEAT_TOOLBAR) && ((defined(FEAT_GUI_GTK) && defined(HAVE_GTK2)) \
5141 || defined(FEAT_GUI_MACVIM))
5142 (void)opt_strings_flags(p_tbis, p_tbis_values, &tbis_flags, FALSE);
5143 #endif
5144 #ifdef FEAT_CMDWIN
5145 /* set cedit_key */
5146 (void)check_cedit();
5147 #endif
5148 }
5149
5150 /*
5151 * Check for string options that are NULL (normally only termcap options).
5152 */
5153 void
5154 check_options()
5155 {
5156 int opt_idx;
5157
5158 for (opt_idx = 0; options[opt_idx].fullname != NULL; opt_idx++)
5159 if ((options[opt_idx].flags & P_STRING) && options[opt_idx].var != NULL)
5160 check_string_option((char_u **)get_varp(&(options[opt_idx])));
5161 }
5162
5163 /*
5164 * Check string options in a buffer for NULL value.
5165 */
5166 void
5167 check_buf_options(buf)
5168 buf_T *buf;
5169 {
5170 #if defined(FEAT_QUICKFIX)
5171 check_string_option(&buf->b_p_bh);
5172 check_string_option(&buf->b_p_bt);
5173 #endif
5174 #ifdef FEAT_MBYTE
5175 check_string_option(&buf->b_p_fenc);
5176 #endif
5177 check_string_option(&buf->b_p_ff);
5178 #ifdef FEAT_FIND_ID
5179 check_string_option(&buf->b_p_def);
5180 check_string_option(&buf->b_p_inc);
5181 # ifdef FEAT_EVAL
5182 check_string_option(&buf->b_p_inex);
5183 # endif
5184 #endif
5185 #if defined(FEAT_CINDENT) && defined(FEAT_EVAL)
5186 check_string_option(&buf->b_p_inde);
5187 check_string_option(&buf->b_p_indk);
5188 #endif
5189 #if defined(FEAT_BEVAL) && defined(FEAT_EVAL)
5190 check_string_option(&buf->b_p_bexpr);
5191 #endif
5192 #if defined(FEAT_EVAL)
5193 check_string_option(&buf->b_p_fex);
5194 #endif
5195 #ifdef FEAT_CRYPT
5196 check_string_option(&buf->b_p_key);
5197 #endif
5198 check_string_option(&buf->b_p_kp);
5199 check_string_option(&buf->b_p_mps);
5200 check_string_option(&buf->b_p_fo);
5201 check_string_option(&buf->b_p_flp);
5202 check_string_option(&buf->b_p_isk);
5203 #ifdef FEAT_COMMENTS
5204 check_string_option(&buf->b_p_com);
5205 #endif
5206 #ifdef FEAT_FOLDING
5207 check_string_option(&buf->b_p_cms);
5208 #endif
5209 check_string_option(&buf->b_p_nf);
5210 #ifdef FEAT_TEXTOBJ
5211 check_string_option(&buf->b_p_qe);
5212 #endif
5213 #ifdef FEAT_SYN_HL
5214 check_string_option(&buf->b_p_syn);
5215 #endif
5216 #ifdef FEAT_SPELL
5217 check_string_option(&buf->b_p_spc);
5218 check_string_option(&buf->b_p_spf);
5219 check_string_option(&buf->b_p_spl);
5220 #endif
5221 #ifdef FEAT_SEARCHPATH
5222 check_string_option(&buf->b_p_sua);
5223 #endif
5224 #ifdef FEAT_CINDENT
5225 check_string_option(&buf->b_p_cink);
5226 check_string_option(&buf->b_p_cino);
5227 #endif
5228 #ifdef FEAT_AUTOCMD
5229 check_string_option(&buf->b_p_ft);
5230 #endif
5231 #ifdef FEAT_OSFILETYPE
5232 check_string_option(&buf->b_p_oft);
5233 #endif
5234 #if defined(FEAT_SMARTINDENT) || defined(FEAT_CINDENT)
5235 check_string_option(&buf->b_p_cinw);
5236 #endif
5237 #ifdef FEAT_INS_EXPAND
5238 check_string_option(&buf->b_p_cpt);
5239 #endif
5240 #ifdef FEAT_COMPL_FUNC
5241 check_string_option(&buf->b_p_cfu);
5242 check_string_option(&buf->b_p_ofu);
5243 #endif
5244 #ifdef FEAT_KEYMAP
5245 check_string_option(&buf->b_p_keymap);
5246 #endif
5247 #ifdef FEAT_QUICKFIX
5248 check_string_option(&buf->b_p_gp);
5249 check_string_option(&buf->b_p_mp);
5250 check_string_option(&buf->b_p_efm);
5251 #endif
5252 check_string_option(&buf->b_p_ep);
5253 check_string_option(&buf->b_p_path);
5254 check_string_option(&buf->b_p_tags);
5255 #ifdef FEAT_INS_EXPAND
5256 check_string_option(&buf->b_p_dict);
5257 check_string_option(&buf->b_p_tsr);
5258 #endif
5259 }
5260
5261 /*
5262 * Free the string allocated for an option.
5263 * Checks for the string being empty_option. This may happen if we're out of
5264 * memory, vim_strsave() returned NULL, which was replaced by empty_option by
5265 * check_options().
5266 * Does NOT check for P_ALLOCED flag!
5267 */
5268 void
5269 free_string_option(p)
5270 char_u *p;
5271 {
5272 if (p != empty_option)
5273 vim_free(p);
5274 }
5275
5276 void
5277 clear_string_option(pp)
5278 char_u **pp;
5279 {
5280 if (*pp != empty_option)
5281 vim_free(*pp);
5282 *pp = empty_option;
5283 }
5284
5285 static void
5286 check_string_option(pp)
5287 char_u **pp;
5288 {
5289 if (*pp == NULL)
5290 *pp = empty_option;
5291 }
5292
5293 /*
5294 * Mark a terminal option as allocated, found by a pointer into term_strings[].
5295 */
5296 void
5297 set_term_option_alloced(p)
5298 char_u **p;
5299 {
5300 int opt_idx;
5301
5302 for (opt_idx = 1; options[opt_idx].fullname != NULL; opt_idx++)
5303 if (options[opt_idx].var == (char_u *)p)
5304 {
5305 options[opt_idx].flags |= P_ALLOCED;
5306 return;
5307 }
5308 return; /* cannot happen: didn't find it! */
5309 }
5310
5311 #if defined(FEAT_EVAL) || defined(PROTO)
5312 /*
5313 * Return TRUE when option "opt" was set from a modeline or in secure mode.
5314 * Return FALSE when it wasn't.
5315 * Return -1 for an unknown option.
5316 */
5317 int
5318 was_set_insecurely(opt, opt_flags)
5319 char_u *opt;
5320 int opt_flags;
5321 {
5322 int idx = findoption(opt);
5323 long_u *flagp;
5324
5325 if (idx >= 0)
5326 {
5327 flagp = insecure_flag(idx, opt_flags);
5328 return (*flagp & P_INSECURE) != 0;
5329 }
5330 EMSG2(_(e_intern2), "was_set_insecurely()");
5331 return -1;
5332 }
5333
5334 /*
5335 * Get a pointer to the flags used for the P_INSECURE flag of option
5336 * "opt_idx". For some local options a local flags field is used.
5337 */
5338 static long_u *
5339 insecure_flag(opt_idx, opt_flags)
5340 int opt_idx;
5341 int opt_flags;
5342 {
5343 if (opt_flags & OPT_LOCAL)
5344 switch ((int)options[opt_idx].indir)
5345 {
5346 #ifdef FEAT_STL_OPT
5347 case PV_STL: return &curwin->w_p_stl_flags;
5348 #endif
5349 #ifdef FEAT_EVAL
5350 # ifdef FEAT_FOLDING
5351 case PV_FDE: return &curwin->w_p_fde_flags;
5352 case PV_FDT: return &curwin->w_p_fdt_flags;
5353 # endif
5354 # ifdef FEAT_BEVAL
5355 case PV_BEXPR: return &curbuf->b_p_bexpr_flags;
5356 # endif
5357 # if defined(FEAT_CINDENT)
5358 case PV_INDE: return &curbuf->b_p_inde_flags;
5359 # endif
5360 case PV_FEX: return &curbuf->b_p_fex_flags;
5361 # ifdef FEAT_FIND_ID
5362 case PV_INEX: return &curbuf->b_p_inex_flags;
5363 # endif
5364 #endif
5365 }
5366
5367 /* Nothing special, return global flags field. */
5368 return &options[opt_idx].flags;
5369 }
5370 #endif
5371
5372 #ifdef FEAT_TITLE
5373 static void redraw_titles __ARGS((void));
5374
5375 /*
5376 * Redraw the window title and/or tab page text later.
5377 */
5378 static void redraw_titles()
5379 {
5380 need_maketitle = TRUE;
5381 # ifdef FEAT_WINDOWS
5382 redraw_tabline = TRUE;
5383 # endif
5384 }
5385 #endif
5386
5387 /*
5388 * Set a string option to a new value (without checking the effect).
5389 * The string is copied into allocated memory.
5390 * if ("opt_idx" == -1) "name" is used, otherwise "opt_idx" is used.
5391 * When "set_sid" is zero set the scriptID to current_SID. When "set_sid" is
5392 * SID_NONE don't set the scriptID. Otherwise set the scriptID to "set_sid".
5393 */
5394 void
5395 set_string_option_direct(name, opt_idx, val, opt_flags, set_sid)
5396 char_u *name;
5397 int opt_idx;
5398 char_u *val;
5399 int opt_flags; /* OPT_FREE, OPT_LOCAL and/or OPT_GLOBAL */
5400 int set_sid UNUSED;
5401 {
5402 char_u *s;
5403 char_u **varp;
5404 int both = (opt_flags & (OPT_LOCAL | OPT_GLOBAL)) == 0;
5405 int idx = opt_idx;
5406
5407 if (idx == -1) /* use name */
5408 {
5409 idx = findoption(name);
5410 if (idx < 0) /* not found (should not happen) */
5411 {
5412 EMSG2(_(e_intern2), "set_string_option_direct()");
5413 return;
5414 }
5415 }
5416
5417 if (options[idx].var == NULL) /* can't set hidden option */
5418 return;
5419
5420 s = vim_strsave(val);
5421 if (s != NULL)
5422 {
5423 varp = (char_u **)get_varp_scope(&(options[idx]),
5424 both ? OPT_LOCAL : opt_flags);
5425 if ((opt_flags & OPT_FREE) && (options[idx].flags & P_ALLOCED))
5426 free_string_option(*varp);
5427 *varp = s;
5428
5429 /* For buffer/window local option may also set the global value. */
5430 if (both)
5431 set_string_option_global(idx, varp);
5432
5433 options[idx].flags |= P_ALLOCED;
5434
5435 /* When setting both values of a global option with a local value,
5436 * make the local value empty, so that the global value is used. */
5437 if (((int)options[idx].indir & PV_BOTH) && both)
5438 {
5439 free_string_option(*varp);
5440 *varp = empty_option;
5441 }
5442 # ifdef FEAT_EVAL
5443 if (set_sid != SID_NONE)
5444 set_option_scriptID_idx(idx, opt_flags,
5445 set_sid == 0 ? current_SID : set_sid);
5446 # endif
5447 }
5448 }
5449
5450 /*
5451 * Set global value for string option when it's a local option.
5452 */
5453 static void
5454 set_string_option_global(opt_idx, varp)
5455 int opt_idx; /* option index */
5456 char_u **varp; /* pointer to option variable */
5457 {
5458 char_u **p, *s;
5459
5460 /* the global value is always allocated */
5461 if (options[opt_idx].var == VAR_WIN)
5462 p = (char_u **)GLOBAL_WO(varp);
5463 else
5464 p = (char_u **)options[opt_idx].var;
5465 if (options[opt_idx].indir != PV_NONE
5466 && p != varp
5467 && (s = vim_strsave(*varp)) != NULL)
5468 {
5469 free_string_option(*p);
5470 *p = s;
5471 }
5472 }
5473
5474 /*
5475 * Set a string option to a new value, and handle the effects.
5476 */
5477 static void
5478 set_string_option(opt_idx, value, opt_flags)
5479 int opt_idx;
5480 char_u *value;
5481 int opt_flags; /* OPT_LOCAL and/or OPT_GLOBAL */
5482 {
5483 char_u *s;
5484 char_u **varp;
5485 char_u *oldval;
5486
5487 if (options[opt_idx].var == NULL) /* don't set hidden option */
5488 return;
5489
5490 s = vim_strsave(value);
5491 if (s != NULL)
5492 {
5493 varp = (char_u **)get_varp_scope(&(options[opt_idx]),
5494 (opt_flags & (OPT_LOCAL | OPT_GLOBAL)) == 0
5495 ? (((int)options[opt_idx].indir & PV_BOTH)
5496 ? OPT_GLOBAL : OPT_LOCAL)
5497 : opt_flags);
5498 oldval = *varp;
5499 *varp = s;
5500 if (did_set_string_option(opt_idx, varp, TRUE, oldval, NULL,
5501 opt_flags) == NULL)
5502 did_set_option(opt_idx, opt_flags, TRUE);
5503 }
5504 }
5505
5506 /*
5507 * Handle string options that need some action to perform when changed.
5508 * Returns NULL for success, or an error message for an error.
5509 */
5510 static char_u *
5511 did_set_string_option(opt_idx, varp, new_value_alloced, oldval, errbuf,
5512 opt_flags)
5513 int opt_idx; /* index in options[] table */
5514 char_u **varp; /* pointer to the option variable */
5515 int new_value_alloced; /* new value was allocated */
5516 char_u *oldval; /* previous value of the option */
5517 char_u *errbuf; /* buffer for errors, or NULL */
5518 int opt_flags; /* OPT_LOCAL and/or OPT_GLOBAL */
5519 {
5520 char_u *errmsg = NULL;
5521 char_u *s, *p;
5522 int did_chartab = FALSE;
5523 char_u **gvarp;
5524 long_u free_oldval = (options[opt_idx].flags & P_ALLOCED);
5525 #ifdef FEAT_GUI
5526 /* set when changing an option that only requires a redraw in the GUI */
5527 int redraw_gui_only = FALSE;
5528 #endif
5529
5530 /* Get the global option to compare with, otherwise we would have to check
5531 * two values for all local options. */
5532 gvarp = (char_u **)get_varp_scope(&(options[opt_idx]), OPT_GLOBAL);
5533
5534 /* Disallow changing some options from secure mode */
5535 if ((secure
5536 #ifdef HAVE_SANDBOX
5537 || sandbox != 0
5538 #endif
5539 ) && (options[opt_idx].flags & P_SECURE))
5540 {
5541 errmsg = e_secure;
5542 }
5543
5544 /* Check for a "normal" file name in some options. Disallow a path
5545 * separator (slash and/or backslash), wildcards and characters that are
5546 * often illegal in a file name. */
5547 else if ((options[opt_idx].flags & P_NFNAME)
5548 && vim_strpbrk(*varp, (char_u *)"/\\*?[|<>") != NULL)
5549 {
5550 errmsg = e_invarg;
5551 }
5552
5553 /* 'term' */
5554 else if (varp == &T_NAME)
5555 {
5556 if (T_NAME[0] == NUL)
5557 errmsg = (char_u *)N_("E529: Cannot set 'term' to empty string");
5558 #ifdef FEAT_GUI
5559 if (gui.in_use)
5560 errmsg = (char_u *)N_("E530: Cannot change term in GUI");
5561 else if (term_is_gui(T_NAME))
5562 errmsg = (char_u *)N_("E531: Use \":gui\" to start the GUI");
5563 #endif
5564 else if (set_termname(T_NAME) == FAIL)
5565 errmsg = (char_u *)N_("E522: Not found in termcap");
5566 else
5567 /* Screen colors may have changed. */
5568 redraw_later_clear();
5569 }
5570
5571 /* 'backupcopy' */
5572 else if (varp == &p_bkc)
5573 {
5574 if (opt_strings_flags(p_bkc, p_bkc_values, &bkc_flags, TRUE) != OK)
5575 errmsg = e_invarg;
5576 if (((bkc_flags & BKC_AUTO) != 0)
5577 + ((bkc_flags & BKC_YES) != 0)
5578 + ((bkc_flags & BKC_NO) != 0) != 1)
5579 {
5580 /* Must have exactly one of "auto", "yes" and "no". */
5581 (void)opt_strings_flags(oldval, p_bkc_values, &bkc_flags, TRUE);
5582 errmsg = e_invarg;
5583 }
5584 }
5585
5586 /* 'backupext' and 'patchmode' */
5587 else if (varp == &p_bex || varp == &p_pm)
5588 {
5589 if (STRCMP(*p_bex == '.' ? p_bex + 1 : p_bex,
5590 *p_pm == '.' ? p_pm + 1 : p_pm) == 0)
5591 errmsg = (char_u *)N_("E589: 'backupext' and 'patchmode' are equal");
5592 }
5593
5594 /*
5595 * 'isident', 'iskeyword', 'isprint or 'isfname' option: refill chartab[]
5596 * If the new option is invalid, use old value. 'lisp' option: refill
5597 * chartab[] for '-' char
5598 */
5599 else if ( varp == &p_isi
5600 || varp == &(curbuf->b_p_isk)
5601 || varp == &p_isp
5602 || varp == &p_isf)
5603 {
5604 if (init_chartab() == FAIL)
5605 {
5606 did_chartab = TRUE; /* need to restore it below */
5607 errmsg = e_invarg; /* error in value */
5608 }
5609 }
5610
5611 /* 'helpfile' */
5612 else if (varp == &p_hf)
5613 {
5614 /* May compute new values for $VIM and $VIMRUNTIME */
5615 if (didset_vim)
5616 {
5617 vim_setenv((char_u *)"VIM", (char_u *)"");
5618 didset_vim = FALSE;
5619 }
5620 if (didset_vimruntime)
5621 {
5622 vim_setenv((char_u *)"VIMRUNTIME", (char_u *)"");
5623 didset_vimruntime = FALSE;
5624 }
5625 }
5626
5627 #ifdef FEAT_MULTI_LANG
5628 /* 'helplang' */
5629 else if (varp == &p_hlg)
5630 {
5631 /* Check for "", "ab", "ab,cd", etc. */
5632 for (s = p_hlg; *s != NUL; s += 3)
5633 {
5634 if (s[1] == NUL || ((s[2] != ',' || s[3] == NUL) && s[2] != NUL))
5635 {
5636 errmsg = e_invarg;
5637 break;
5638 }
5639 if (s[2] == NUL)
5640 break;
5641 }
5642 }
5643 #endif
5644
5645 /* 'highlight' */
5646 else if (varp == &p_hl)
5647 {
5648 if (highlight_changed() == FAIL)
5649 errmsg = e_invarg; /* invalid flags */
5650 }
5651
5652 /* 'nrformats' */
5653 else if (gvarp == &p_nf)
5654 {
5655 if (check_opt_strings(*varp, p_nf_values, TRUE) != OK)
5656 errmsg = e_invarg;
5657 }
5658
5659 #ifdef FEAT_SESSION
5660 /* 'sessionoptions' */
5661 else if (varp == &p_ssop)
5662 {
5663 if (opt_strings_flags(p_ssop, p_ssop_values, &ssop_flags, TRUE) != OK)
5664 errmsg = e_invarg;
5665 if ((ssop_flags & SSOP_CURDIR) && (ssop_flags & SSOP_SESDIR))
5666 {
5667 /* Don't allow both "sesdir" and "curdir". */
5668 (void)opt_strings_flags(oldval, p_ssop_values, &ssop_flags, TRUE);
5669 errmsg = e_invarg;
5670 }
5671 }
5672 /* 'viewoptions' */
5673 else if (varp == &p_vop)
5674 {
5675 if (opt_strings_flags(p_vop, p_ssop_values, &vop_flags, TRUE) != OK)
5676 errmsg = e_invarg;
5677 }
5678 #endif
5679
5680 /* 'scrollopt' */
5681 #ifdef FEAT_SCROLLBIND
5682 else if (varp == &p_sbo)
5683 {
5684 if (check_opt_strings(p_sbo, p_scbopt_values, TRUE) != OK)
5685 errmsg = e_invarg;
5686 }
5687 #endif
5688
5689 /* 'ambiwidth' */
5690 #ifdef FEAT_MBYTE
5691 else if (varp == &p_ambw)
5692 {
5693 if (check_opt_strings(p_ambw, p_ambw_values, FALSE) != OK)
5694 errmsg = e_invarg;
5695 }
5696 #endif
5697
5698 /* 'background' */
5699 else if (varp == &p_bg)
5700 {
5701 if (check_opt_strings(p_bg, p_bg_values, FALSE) == OK)
5702 {
5703 #ifdef FEAT_EVAL
5704 int dark = (*p_bg == 'd');
5705 #endif
5706
5707 init_highlight(FALSE, FALSE);
5708
5709 #ifdef FEAT_EVAL
5710 if (dark != (*p_bg == 'd')
5711 && get_var_value((char_u *)"g:colors_name") != NULL)
5712 {
5713 /* The color scheme must have set 'background' back to another
5714 * value, that's not what we want here. Disable the color
5715 * scheme and set the colors again. */
5716 do_unlet((char_u *)"g:colors_name", TRUE);
5717 free_string_option(p_bg);
5718 p_bg = vim_strsave((char_u *)(dark ? "dark" : "light"));
5719 check_string_option(&p_bg);
5720 init_highlight(FALSE, FALSE);
5721 }
5722 #endif
5723 }
5724 else
5725 errmsg = e_invarg;
5726 }
5727
5728 /* 'wildmode' */
5729 else if (varp == &p_wim)
5730 {
5731 if (check_opt_wim() == FAIL)
5732 errmsg = e_invarg;
5733 }
5734
5735 #ifdef FEAT_CMDL_COMPL
5736 /* 'wildoptions' */
5737 else if (varp == &p_wop)
5738 {
5739 if (check_opt_strings(p_wop, p_wop_values, TRUE) != OK)
5740 errmsg = e_invarg;
5741 }
5742 #endif
5743
5744 #ifdef FEAT_WAK
5745 /* 'winaltkeys' */
5746 else if (varp == &p_wak)
5747 {
5748 if (*p_wak == NUL
5749 || check_opt_strings(p_wak, p_wak_values, FALSE) != OK)
5750 errmsg = e_invarg;
5751 # ifdef FEAT_MENU
5752 # ifdef FEAT_GUI_MOTIF
5753 else if (gui.in_use)
5754 gui_motif_set_mnemonics(p_wak[0] == 'y' || p_wak[0] == 'm');
5755 # else
5756 # ifdef FEAT_GUI_GTK
5757 else if (gui.in_use)
5758 gui_gtk_set_mnemonics(p_wak[0] == 'y' || p_wak[0] == 'm');
5759 # endif
5760 # endif
5761 # endif
5762 }
5763 #endif
5764
5765 #ifdef FEAT_AUTOCMD
5766 /* 'eventignore' */
5767 else if (varp == &p_ei)
5768 {
5769 if (check_ei() == FAIL)
5770 errmsg = e_invarg;
5771 }
5772 #endif
5773
5774 #ifdef FEAT_MBYTE
5775 /* 'encoding' and 'fileencoding' */
5776 else if (varp == &p_enc || gvarp == &p_fenc || varp == &p_tenc)
5777 {
5778 if (gvarp == &p_fenc)
5779 {
5780 if (!curbuf->b_p_ma && opt_flags != OPT_GLOBAL)
5781 errmsg = e_modifiable;
5782 else if (vim_strchr(*varp, ',') != NULL)
5783 /* No comma allowed in 'fileencoding'; catches confusing it
5784 * with 'fileencodings'. */
5785 errmsg = e_invarg;
5786 else
5787 {
5788 # ifdef FEAT_TITLE
5789 /* May show a "+" in the title now. */
5790 redraw_titles();
5791 # endif
5792 /* Add 'fileencoding' to the swap file. */
5793 ml_setflags(curbuf);
5794 }
5795 }
5796 if (errmsg == NULL)
5797 {
5798 /* canonize the value, so that STRCMP() can be used on it */
5799 p = enc_canonize(*varp);
5800 if (p != NULL)
5801 {
5802 vim_free(*varp);
5803 *varp = p;
5804 }
5805 if (varp == &p_enc)
5806 {
5807 errmsg = mb_init();
5808 # ifdef FEAT_TITLE
5809 redraw_titles();
5810 # endif
5811 }
5812 }
5813
5814 # if (defined(FEAT_GUI_GTK) && defined(HAVE_GTK2)) || defined(FEAT_GUI_MACVIM)
5815 if (errmsg == NULL && varp == &p_tenc && gui.in_use)
5816 {
5817 /* MacVim and GTK+ 2 GUIs force 'tenc' to UTF-8. */
5818 if (STRCMP(p_tenc, "utf-8") != 0)
5819 # if defined(FEAT_GUI_MACVIM)
5820 errmsg = (char_u *)N_("E617: Cannot be changed in MacVim");
5821 # else
5822 errmsg = (char_u *)N_("E617: Cannot be changed in the GTK+ 2 GUI");
5823 # endif
5824 }
5825 # endif
5826
5827 if (errmsg == NULL)
5828 {
5829 # ifdef FEAT_KEYMAP
5830 /* When 'keymap' is used and 'encoding' changes, reload the keymap
5831 * (with another encoding). */
5832 if (varp == &p_enc && *curbuf->b_p_keymap != NUL)
5833 (void)keymap_init();
5834 # endif
5835
5836 /* When 'termencoding' is not empty and 'encoding' changes or when
5837 * 'termencoding' changes, need to setup for keyboard input and
5838 * display output conversion. */
5839 if (((varp == &p_enc && *p_tenc != NUL) || varp == &p_tenc))
5840 {
5841 convert_setup(&input_conv, p_tenc, p_enc);
5842 convert_setup(&output_conv, p_enc, p_tenc);
5843 }
5844
5845 # if defined(WIN3264) && defined(FEAT_MBYTE)
5846 /* $HOME may have characters in active code page. */
5847 if (varp == &p_enc)
5848 init_homedir();
5849 # endif
5850 }
5851 }
5852 #endif
5853
5854 #if defined(FEAT_POSTSCRIPT)
5855 else if (varp == &p_penc)
5856 {
5857 /* Canonize printencoding if VIM standard one */
5858 p = enc_canonize(p_penc);
5859 if (p != NULL)
5860 {
5861 vim_free(p_penc);
5862 p_penc = p;
5863 }
5864 else
5865 {
5866 /* Ensure lower case and '-' for '_' */
5867 for (s = p_penc; *s != NUL; s++)
5868 {
5869 if (*s == '_')
5870 *s = '-';
5871 else
5872 *s = TOLOWER_ASC(*s);
5873 }
5874 }
5875 }
5876 #endif
5877
5878 #if defined(FEAT_XIM) && defined(FEAT_GUI_GTK)
5879 else if (varp == &p_imak)
5880 {
5881 if (gui.in_use && !im_xim_isvalid_imactivate())
5882 errmsg = e_invarg;
5883 }
5884 #endif
5885
5886 #ifdef FEAT_KEYMAP
5887 else if (varp == &curbuf->b_p_keymap)
5888 {
5889 /* load or unload key mapping tables */
5890 errmsg = keymap_init();
5891
5892 if (errmsg == NULL)
5893 {
5894 if (*curbuf->b_p_keymap != NUL)
5895 {
5896 /* Installed a new keymap, switch on using it. */
5897 curbuf->b_p_iminsert = B_IMODE_LMAP;
5898 if (curbuf->b_p_imsearch != B_IMODE_USE_INSERT)
5899 curbuf->b_p_imsearch = B_IMODE_LMAP;
5900 }
5901 else
5902 {
5903 /* Cleared the keymap, may reset 'iminsert' and 'imsearch'. */
5904 if (curbuf->b_p_iminsert == B_IMODE_LMAP)
5905 curbuf->b_p_iminsert = B_IMODE_NONE;
5906 if (curbuf->b_p_imsearch == B_IMODE_LMAP)
5907 curbuf->b_p_imsearch = B_IMODE_USE_INSERT;
5908 }
5909 if ((opt_flags & OPT_LOCAL) == 0)
5910 {
5911 set_iminsert_global();
5912 set_imsearch_global();
5913 }
5914 # ifdef FEAT_WINDOWS
5915 status_redraw_curbuf();
5916 # endif
5917 }
5918 }
5919 #endif
5920
5921 /* 'fileformat' */
5922 else if (gvarp == &p_ff)
5923 {
5924 if (!curbuf->b_p_ma && !(opt_flags & OPT_GLOBAL))
5925 errmsg = e_modifiable;
5926 else if (check_opt_strings(*varp, p_ff_values, FALSE) != OK)
5927 errmsg = e_invarg;
5928 else
5929 {
5930 /* may also change 'textmode' */
5931 if (get_fileformat(curbuf) == EOL_DOS)
5932 curbuf->b_p_tx = TRUE;
5933 else
5934 curbuf->b_p_tx = FALSE;
5935 #ifdef FEAT_TITLE
5936 redraw_titles();
5937 #endif
5938 /* update flag in swap file */
5939 ml_setflags(curbuf);
5940 }
5941 }
5942
5943 /* 'fileformats' */
5944 else if (varp == &p_ffs)
5945 {
5946 if (check_opt_strings(p_ffs, p_ff_values, TRUE) != OK)
5947 errmsg = e_invarg;
5948 else
5949 {
5950 /* also change 'textauto' */
5951 if (*p_ffs == NUL)
5952 p_ta = FALSE;
5953 else
5954 p_ta = TRUE;
5955 }
5956 }
5957
5958 #if defined(FEAT_CRYPT) && defined(FEAT_CMDHIST)
5959 /* 'cryptkey' */
5960 else if (gvarp == &p_key)
5961 {
5962 /* Make sure the ":set" command doesn't show the new value in the
5963 * history. */
5964 remove_key_from_history();
5965 }
5966 #endif
5967
5968 /* 'matchpairs' */
5969 else if (gvarp == &p_mps)
5970 {
5971 /* Check for "x:y,x:y" */
5972 for (p = *varp; *p != NUL; p += 4)
5973 {
5974 if (p[1] != ':' || p[2] == NUL || (p[3] != NUL && p[3] != ','))
5975 {
5976 errmsg = e_invarg;
5977 break;
5978 }
5979 if (p[3] == NUL)
5980 break;
5981 }
5982 }
5983
5984 #ifdef FEAT_COMMENTS
5985 /* 'comments' */
5986 else if (gvarp == &p_com)
5987 {
5988 for (s = *varp; *s; )
5989 {
5990 while (*s && *s != ':')
5991 {
5992 if (vim_strchr((char_u *)COM_ALL, *s) == NULL
5993 && !VIM_ISDIGIT(*s) && *s != '-')
5994 {
5995 errmsg = illegal_char(errbuf, *s);
5996 break;
5997 }
5998 ++s;
5999 }
6000 if (*s++ == NUL)
6001 errmsg = (char_u *)N_("E524: Missing colon");
6002 else if (*s == ',' || *s == NUL)
6003 errmsg = (char_u *)N_("E525: Zero length string");
6004 if (errmsg != NULL)
6005 break;
6006 while (*s && *s != ',')
6007 {
6008 if (*s == '\\' && s[1] != NUL)
6009 ++s;
6010 ++s;
6011 }
6012 s = skip_to_option_part(s);
6013 }
6014 }
6015 #endif
6016
6017 /* 'listchars' */
6018 else if (varp == &p_lcs)
6019 {
6020 errmsg = set_chars_option(varp);
6021 }
6022
6023 #if defined(FEAT_WINDOWS) || defined(FEAT_FOLDING)
6024 /* 'fillchars' */
6025 else if (varp == &p_fcs)
6026 {
6027 errmsg = set_chars_option(varp);
6028 }
6029 #endif
6030
6031 #ifdef FEAT_CMDWIN
6032 /* 'cedit' */
6033 else if (varp == &p_cedit)
6034 {
6035 errmsg = check_cedit();
6036 }
6037 #endif
6038
6039 /* 'verbosefile' */
6040 else if (varp == &p_vfile)
6041 {
6042 verbose_stop();
6043 if (*p_vfile != NUL && verbose_open() == FAIL)
6044 errmsg = e_invarg;
6045 }
6046
6047 #ifdef FEAT_VIMINFO
6048 /* 'viminfo' */
6049 else if (varp == &p_viminfo)
6050 {
6051 for (s = p_viminfo; *s;)
6052 {
6053 /* Check it's a valid character */
6054 if (vim_strchr((char_u *)"!\"%'/:<@cfhnrs", *s) == NULL)
6055 {
6056 errmsg = illegal_char(errbuf, *s);
6057 break;
6058 }
6059 if (*s == 'n') /* name is always last one */
6060 {
6061 break;
6062 }
6063 else if (*s == 'r') /* skip until next ',' */
6064 {
6065 while (*++s && *s != ',')
6066 ;
6067 }
6068 else if (*s == '%')
6069 {
6070 /* optional number */
6071 while (vim_isdigit(*++s))
6072 ;
6073 }
6074 else if (*s == '!' || *s == 'h' || *s == 'c')
6075 ++s; /* no extra chars */
6076 else /* must have a number */
6077 {
6078 while (vim_isdigit(*++s))
6079 ;
6080
6081 if (!VIM_ISDIGIT(*(s - 1)))
6082 {
6083 if (errbuf != NULL)
6084 {
6085 sprintf((char *)errbuf,
6086 _("E526: Missing number after <%s>"),
6087 transchar_byte(*(s - 1)));
6088 errmsg = errbuf;
6089 }
6090 else
6091 errmsg = (char_u *)"";
6092 break;
6093 }
6094 }
6095 if (*s == ',')
6096 ++s;
6097 else if (*s)
6098 {
6099 if (errbuf != NULL)
6100 errmsg = (char_u *)N_("E527: Missing comma");
6101 else
6102 errmsg = (char_u *)"";
6103 break;
6104 }
6105 }
6106 if (*p_viminfo && errmsg == NULL && get_viminfo_parameter('\'') < 0)
6107 errmsg = (char_u *)N_("E528: Must specify a ' value");
6108 }
6109 #endif /* FEAT_VIMINFO */
6110
6111 /* terminal options */
6112 else if (istermoption(&options[opt_idx]) && full_screen)
6113 {
6114 /* ":set t_Co=0" and ":set t_Co=1" do ":set t_Co=" */
6115 if (varp == &T_CCO)
6116 {
6117 int colors = atoi((char *)T_CCO);
6118
6119 /* Only reinitialize colors if t_Co value has really changed to
6120 * avoid expensive reload of colorscheme if t_Co is set to the
6121 * same value multiple times. */
6122 if (colors != t_colors)
6123 {
6124 t_colors = colors;
6125 if (t_colors <= 1)
6126 {
6127 if (new_value_alloced)
6128 vim_free(T_CCO);
6129 T_CCO = empty_option;
6130 }
6131 /* We now have a different color setup, initialize it again. */
6132 init_highlight(TRUE, FALSE);
6133 }
6134 }
6135 ttest(FALSE);
6136 if (varp == &T_ME)
6137 {
6138 out_str(T_ME);
6139 redraw_later(CLEAR);
6140 #if defined(MSDOS) || (defined(WIN3264) && !defined(FEAT_GUI_W32))
6141 /* Since t_me has been set, this probably means that the user
6142 * wants to use this as default colors. Need to reset default
6143 * background/foreground colors. */
6144 mch_set_normal_colors();
6145 #endif
6146 }
6147 }
6148
6149 #ifdef FEAT_LINEBREAK
6150 /* 'showbreak' */
6151 else if (varp == &p_sbr)
6152 {
6153 for (s = p_sbr; *s; )
6154 {
6155 if (ptr2cells(s) != 1)
6156 errmsg = (char_u *)N_("E595: contains unprintable or wide character");
6157 mb_ptr_adv(s);
6158 }
6159 }
6160 #endif
6161
6162 #ifdef FEAT_GUI
6163 /* 'guifont' */
6164 else if (varp == &p_guifont)
6165 {
6166 if (gui.in_use)
6167 {
6168 p = p_guifont;
6169 # if defined(FEAT_GUI_GTK)
6170 /*
6171 * Put up a font dialog and let the user select a new value.
6172 * If this is cancelled go back to the old value but don't
6173 * give an error message.
6174 */
6175 if (STRCMP(p, "*") == 0)
6176 {
6177 p = gui_mch_font_dialog(oldval);
6178
6179 if (new_value_alloced)
6180 free_string_option(p_guifont);
6181
6182 p_guifont = (p != NULL) ? p : vim_strsave(oldval);
6183 new_value_alloced = TRUE;
6184 }
6185 # endif
6186 if (p != NULL && gui_init_font(p_guifont, FALSE) != OK)
6187 {
6188 # if defined(FEAT_GUI_MSWIN) || defined(FEAT_GUI_PHOTON) \
6189 || defined(FEAT_GUI_MACVIM)
6190 if (STRCMP(p_guifont, "*") == 0)
6191 {
6192 /* Dialog was cancelled: Keep the old value without giving
6193 * an error message. */
6194 if (new_value_alloced)
6195 free_string_option(p_guifont);
6196 p_guifont = vim_strsave(oldval);
6197 new_value_alloced = TRUE;
6198 }
6199 else
6200 # endif
6201 errmsg = (char_u *)N_("E596: Invalid font(s)");
6202 }
6203 }
6204 redraw_gui_only = TRUE;
6205 }
6206 # ifdef FEAT_XFONTSET
6207 else if (varp == &p_guifontset)
6208 {
6209 if (STRCMP(p_guifontset, "*") == 0)
6210 errmsg = (char_u *)N_("E597: can't select fontset");
6211 else if (gui.in_use && gui_init_font(p_guifontset, TRUE) != OK)
6212 errmsg = (char_u *)N_("E598: Invalid fontset");
6213 redraw_gui_only = TRUE;
6214 }
6215 # endif
6216 # ifdef FEAT_MBYTE
6217 else if (varp == &p_guifontwide)
6218 {
6219 if (STRCMP(p_guifontwide, "*") == 0)
6220 errmsg = (char_u *)N_("E533: can't select wide font");
6221 else if (gui_get_wide_font() == FAIL)
6222 errmsg = (char_u *)N_("E534: Invalid wide font");
6223 redraw_gui_only = TRUE;
6224 }
6225 # endif
6226 #endif
6227
6228 #ifdef CURSOR_SHAPE
6229 /* 'guicursor' */
6230 else if (varp == &p_guicursor)
6231 errmsg = parse_shape_opt(SHAPE_CURSOR);
6232 #endif
6233
6234 #ifdef FEAT_MOUSESHAPE
6235 /* 'mouseshape' */
6236 else if (varp == &p_mouseshape)
6237 {
6238 errmsg = parse_shape_opt(SHAPE_MOUSE);
6239 update_mouseshape(-1);
6240 }
6241 #endif
6242
6243 #ifdef FEAT_PRINTER
6244 else if (varp == &p_popt)
6245 errmsg = parse_printoptions();
6246 # if defined(FEAT_MBYTE) && defined(FEAT_POSTSCRIPT)
6247 else if (varp == &p_pmfn)
6248 errmsg = parse_printmbfont();
6249 # endif
6250 #endif
6251
6252 #ifdef FEAT_LANGMAP
6253 /* 'langmap' */
6254 else if (varp == &p_langmap)
6255 langmap_set();
6256 #endif
6257
6258 #ifdef FEAT_LINEBREAK
6259 /* 'breakat' */
6260 else if (varp == &p_breakat)
6261 fill_breakat_flags();
6262 #endif
6263
6264 #ifdef FEAT_TITLE
6265 /* 'titlestring' and 'iconstring' */
6266 else if (varp == &p_titlestring || varp == &p_iconstring)
6267 {
6268 # ifdef FEAT_STL_OPT
6269 int flagval = (varp == &p_titlestring) ? STL_IN_TITLE : STL_IN_ICON;
6270
6271 /* NULL => statusline syntax */
6272 if (vim_strchr(*varp, '%') && check_stl_option(*varp) == NULL)
6273 stl_syntax |= flagval;
6274 else
6275 stl_syntax &= ~flagval;
6276 # endif
6277 did_set_title(varp == &p_iconstring);
6278
6279 }
6280 #endif
6281
6282 #ifdef FEAT_GUI
6283 /* 'guioptions' */
6284 else if (varp == &p_go)
6285 {
6286 gui_init_which_components(oldval);
6287 redraw_gui_only = TRUE;
6288 }
6289 #endif
6290
6291 #if defined(FEAT_GUI_TABLINE)
6292 /* 'guitablabel' */
6293 else if (varp == &p_gtl)
6294 {
6295 redraw_tabline = TRUE;
6296 redraw_gui_only = TRUE;
6297 }
6298 /* 'guitabtooltip' */
6299 else if (varp == &p_gtt)
6300 {
6301 redraw_gui_only = TRUE;
6302 }
6303 #endif
6304
6305 #if defined(FEAT_MOUSE_TTY) && (defined(UNIX) || defined(VMS))
6306 /* 'ttymouse' */
6307 else if (varp == &p_ttym)
6308 {
6309 /* Switch the mouse off before changing the escape sequences used for
6310 * that. */
6311 mch_setmouse(FALSE);
6312 if (opt_strings_flags(p_ttym, p_ttym_values, &ttym_flags, FALSE) != OK)
6313 errmsg = e_invarg;
6314 else
6315 check_mouse_termcode();
6316 if (termcap_active)
6317 setmouse(); /* may switch it on again */
6318 }
6319 #endif
6320
6321 #ifdef FEAT_VISUAL
6322 /* 'selection' */
6323 else if (varp == &p_sel)
6324 {
6325 if (*p_sel == NUL
6326 || check_opt_strings(p_sel, p_sel_values, FALSE) != OK)
6327 errmsg = e_invarg;
6328 }
6329
6330 /* 'selectmode' */
6331 else if (varp == &p_slm)
6332 {
6333 if (check_opt_strings(p_slm, p_slm_values, TRUE) != OK)
6334 errmsg = e_invarg;
6335 }
6336 #endif
6337
6338 #ifdef FEAT_BROWSE
6339 /* 'browsedir' */
6340 else if (varp == &p_bsdir)
6341 {
6342 if (check_opt_strings(p_bsdir, p_bsdir_values, FALSE) != OK
6343 && !mch_isdir(p_bsdir))
6344 errmsg = e_invarg;
6345 }
6346 #endif
6347
6348 #ifdef FEAT_VISUAL
6349 /* 'keymodel' */
6350 else if (varp == &p_km)
6351 {
6352 if (check_opt_strings(p_km, p_km_values, TRUE) != OK)
6353 errmsg = e_invarg;
6354 else
6355 {
6356 km_stopsel = (vim_strchr(p_km, 'o') != NULL);
6357 km_startsel = (vim_strchr(p_km, 'a') != NULL);
6358 }
6359 }
6360 #endif
6361
6362 /* 'mousemodel' */
6363 else if (varp == &p_mousem)
6364 {
6365 if (check_opt_strings(p_mousem, p_mousem_values, FALSE) != OK)
6366 errmsg = e_invarg;
6367 #if defined(FEAT_GUI_MOTIF) && defined(FEAT_MENU) && (XmVersion <= 1002)
6368 else if (*p_mousem != *oldval)
6369 /* Changed from "extend" to "popup" or "popup_setpos" or vv: need
6370 * to create or delete the popup menus. */
6371 gui_motif_update_mousemodel(root_menu);
6372 #endif
6373 }
6374
6375 /* 'switchbuf' */
6376 else if (varp == &p_swb)
6377 {
6378 if (opt_strings_flags(p_swb, p_swb_values, &swb_flags, TRUE) != OK)
6379 errmsg = e_invarg;
6380 }
6381
6382 /* 'debug' */
6383 else if (varp == &p_debug)
6384 {
6385 if (check_opt_strings(p_debug, p_debug_values, TRUE) != OK)
6386 errmsg = e_invarg;
6387 }
6388
6389 /* 'display' */
6390 else if (varp == &p_dy)
6391 {
6392 if (opt_strings_flags(p_dy, p_dy_values, &dy_flags, TRUE) != OK)
6393 errmsg = e_invarg;
6394 else
6395 (void)init_chartab();
6396
6397 }
6398
6399 #ifdef FEAT_VERTSPLIT
6400 /* 'eadirection' */
6401 else if (varp == &p_ead)
6402 {
6403 if (check_opt_strings(p_ead, p_ead_values, FALSE) != OK)
6404 errmsg = e_invarg;
6405 }
6406 #endif
6407
6408 #ifdef FEAT_CLIPBOARD
6409 /* 'clipboard' */
6410 else if (varp == &p_cb)
6411 errmsg = check_clipboard_option();
6412 #endif
6413
6414 #ifdef FEAT_SPELL
6415 /* When 'spelllang' or 'spellfile' is set and there is a window for this
6416 * buffer in which 'spell' is set load the wordlists. */
6417 else if (varp == &(curbuf->b_p_spl) || varp == &(curbuf->b_p_spf))
6418 {
6419 win_T *wp;
6420 int l;
6421
6422 if (varp == &(curbuf->b_p_spf))
6423 {
6424 l = (int)STRLEN(curbuf->b_p_spf);
6425 if (l > 0 && (l < 4 || STRCMP(curbuf->b_p_spf + l - 4,
6426 ".add") != 0))
6427 errmsg = e_invarg;
6428 }
6429
6430 if (errmsg == NULL)
6431 {
6432 FOR_ALL_WINDOWS(wp)
6433 if (wp->w_buffer == curbuf && wp->w_p_spell)
6434 {
6435 errmsg = did_set_spelllang(curbuf);
6436 # ifdef FEAT_WINDOWS
6437 break;
6438 # endif
6439 }
6440 }
6441 }
6442 /* When 'spellcapcheck' is set compile the regexp program. */
6443 else if (varp == &(curbuf->b_p_spc))
6444 {
6445 errmsg = compile_cap_prog(curbuf);
6446 }
6447 /* 'spellsuggest' */
6448 else if (varp == &p_sps)
6449 {
6450 if (spell_check_sps() != OK)
6451 errmsg = e_invarg;
6452 }
6453 /* 'mkspellmem' */
6454 else if (varp == &p_msm)
6455 {
6456 if (spell_check_msm() != OK)
6457 errmsg = e_invarg;
6458 }
6459 #endif
6460
6461 #ifdef FEAT_QUICKFIX
6462 /* When 'bufhidden' is set, check for valid value. */
6463 else if (gvarp == &p_bh)
6464 {
6465 if (check_opt_strings(curbuf->b_p_bh, p_bufhidden_values, FALSE) != OK)
6466 errmsg = e_invarg;
6467 }
6468
6469 /* When 'buftype' is set, check for valid value. */
6470 else if (gvarp == &p_bt)
6471 {
6472 if (check_opt_strings(curbuf->b_p_bt, p_buftype_values, FALSE) != OK)
6473 errmsg = e_invarg;
6474 else
6475 {
6476 # ifdef FEAT_WINDOWS
6477 if (curwin->w_status_height)
6478 {
6479 curwin->w_redr_status = TRUE;
6480 redraw_later(VALID);
6481 }
6482 # endif
6483 curbuf->b_help = (curbuf->b_p_bt[0] == 'h');
6484 }
6485 }
6486 #endif
6487
6488 #ifdef FEAT_STL_OPT
6489 /* 'statusline' or 'rulerformat' */
6490 else if (gvarp == &p_stl || varp == &p_ruf)
6491 {
6492 int wid;
6493
6494 if (varp == &p_ruf) /* reset ru_wid first */
6495 ru_wid = 0;
6496 s = *varp;
6497 if (varp == &p_ruf && *s == '%')
6498 {
6499 /* set ru_wid if 'ruf' starts with "%99(" */
6500 if (*++s == '-') /* ignore a '-' */
6501 s++;
6502 wid = getdigits(&s);
6503 if (wid && *s == '(' && (errmsg = check_stl_option(p_ruf)) == NULL)
6504 ru_wid = wid;
6505 else
6506 errmsg = check_stl_option(p_ruf);
6507 }
6508 /* check 'statusline' only if it doesn't start with "%!" */
6509 else if (varp == &p_ruf || s[0] != '%' || s[1] != '!')
6510 errmsg = check_stl_option(s);
6511 if (varp == &p_ruf && errmsg == NULL)
6512 comp_col();
6513 }
6514 #endif
6515
6516 #ifdef FEAT_INS_EXPAND
6517 /* check if it is a valid value for 'complete' -- Acevedo */
6518 else if (gvarp == &p_cpt)
6519 {
6520 for (s = *varp; *s;)
6521 {
6522 while(*s == ',' || *s == ' ')
6523 s++;
6524 if (!*s)
6525 break;
6526 if (vim_strchr((char_u *)".wbuksid]tU", *s) == NULL)
6527 {
6528 errmsg = illegal_char(errbuf, *s);
6529 break;
6530 }
6531 if (*++s != NUL && *s != ',' && *s != ' ')
6532 {
6533 if (s[-1] == 'k' || s[-1] == 's')
6534 {
6535 /* skip optional filename after 'k' and 's' */
6536 while (*s && *s != ',' && *s != ' ')
6537 {
6538 if (*s == '\\')
6539 ++s;
6540 ++s;
6541 }
6542 }
6543 else
6544 {
6545 if (errbuf != NULL)
6546 {
6547 sprintf((char *)errbuf,
6548 _("E535: Illegal character after <%c>"),
6549 *--s);
6550 errmsg = errbuf;
6551 }
6552 else
6553 errmsg = (char_u *)"";
6554 break;
6555 }
6556 }
6557 }
6558 }
6559
6560 /* 'completeopt' */
6561 else if (varp == &p_cot)
6562 {
6563 if (check_opt_strings(p_cot, p_cot_values, TRUE) != OK)
6564 errmsg = e_invarg;
6565 }
6566 #endif /* FEAT_INS_EXPAND */
6567
6568
6569 #if defined(FEAT_TOOLBAR) && !defined(FEAT_GUI_W32)
6570 else if (varp == &p_toolbar)
6571 {
6572 if (opt_strings_flags(p_toolbar, p_toolbar_values,
6573 &toolbar_flags, TRUE) != OK)
6574 errmsg = e_invarg;
6575 else
6576 {
6577 out_flush();
6578 gui_mch_show_toolbar((toolbar_flags &
6579 (TOOLBAR_TEXT | TOOLBAR_ICONS)) != 0);
6580 }
6581 }
6582 #endif
6583
6584 #if defined(FEAT_TOOLBAR) && ((defined(FEAT_GUI_GTK) && defined(HAVE_GTK2)) \
6585 || defined(FEAT_GUI_MACVIM))
6586 /* 'toolbariconsize': GTK+ 2 and MacVim only */
6587 else if (varp == &p_tbis)
6588 {
6589 if (opt_strings_flags(p_tbis, p_tbis_values, &tbis_flags, FALSE) != OK)
6590 errmsg = e_invarg;
6591 else
6592 {
6593 out_flush();
6594 gui_mch_show_toolbar((toolbar_flags &
6595 (TOOLBAR_TEXT | TOOLBAR_ICONS)) != 0);
6596 }
6597 }
6598 #endif
6599
6600 /* 'pastetoggle': translate key codes like in a mapping */
6601 else if (varp == &p_pt)
6602 {
6603 if (*p_pt)
6604 {
6605 (void)replace_termcodes(p_pt, &p, TRUE, TRUE, FALSE);
6606 if (p != NULL)
6607 {
6608 if (new_value_alloced)
6609 free_string_option(p_pt);
6610 p_pt = p;
6611 new_value_alloced = TRUE;
6612 }
6613 }
6614 }
6615
6616 /* 'backspace' */
6617 else if (varp == &p_bs)
6618 {
6619 if (VIM_ISDIGIT(*p_bs))
6620 {
6621 if (*p_bs >'2' || p_bs[1] != NUL)
6622 errmsg = e_invarg;
6623 }
6624 else if (check_opt_strings(p_bs, p_bs_values, TRUE) != OK)
6625 errmsg = e_invarg;
6626 }
6627
6628 #ifdef FEAT_MBYTE
6629 /* 'casemap' */
6630 else if (varp == &p_cmp)
6631 {
6632 if (opt_strings_flags(p_cmp, p_cmp_values, &cmp_flags, TRUE) != OK)
6633 errmsg = e_invarg;
6634 }
6635 #endif
6636
6637 #ifdef FEAT_DIFF
6638 /* 'diffopt' */
6639 else if (varp == &p_dip)
6640 {
6641 if (diffopt_changed() == FAIL)
6642 errmsg = e_invarg;
6643 }
6644 #endif
6645
6646 #ifdef FEAT_FOLDING
6647 /* 'foldmethod' */
6648 else if (gvarp == &curwin->w_allbuf_opt.wo_fdm)
6649 {
6650 if (check_opt_strings(*varp, p_fdm_values, FALSE) != OK
6651 || *curwin->w_p_fdm == NUL)
6652 errmsg = e_invarg;
6653 else
6654 foldUpdateAll(curwin);
6655 }
6656 # ifdef FEAT_EVAL
6657 /* 'foldexpr' */
6658 else if (varp == &curwin->w_p_fde)
6659 {
6660 if (foldmethodIsExpr(curwin))
6661 foldUpdateAll(curwin);
6662 }
6663 # endif
6664 /* 'foldmarker' */
6665 else if (gvarp == &curwin->w_allbuf_opt.wo_fmr)
6666 {
6667 p = vim_strchr(*varp, ',');
6668 if (p == NULL)
6669 errmsg = (char_u *)N_("E536: comma required");
6670 else if (p == *varp || p[1] == NUL)
6671 errmsg = e_invarg;
6672 else if (foldmethodIsMarker(curwin))
6673 foldUpdateAll(curwin);
6674 }
6675 /* 'commentstring' */
6676 else if (gvarp == &p_cms)
6677 {
6678 if (**varp != NUL && strstr((char *)*varp, "%s") == NULL)
6679 errmsg = (char_u *)N_("E537: 'commentstring' must be empty or contain %s");
6680 }
6681 /* 'foldopen' */
6682 else if (varp == &p_fdo)
6683 {
6684 if (opt_strings_flags(p_fdo, p_fdo_values, &fdo_flags, TRUE) != OK)
6685 errmsg = e_invarg;
6686 }
6687 /* 'foldclose' */
6688 else if (varp == &p_fcl)
6689 {
6690 if (check_opt_strings(p_fcl, p_fcl_values, TRUE) != OK)
6691 errmsg = e_invarg;
6692 }
6693 /* 'foldignore' */
6694 else if (gvarp == &curwin->w_allbuf_opt.wo_fdi)
6695 {
6696 if (foldmethodIsIndent(curwin))
6697 foldUpdateAll(curwin);
6698 }
6699 #endif
6700
6701 #ifdef FEAT_FULLSCREEN
6702 /* 'fuoptions' */
6703 else if (varp == &p_fuoptions)
6704 {
6705 if (check_fuoptions(p_fuoptions, &fuoptions_flags,
6706 &fuoptions_bgcolor) != OK)
6707 errmsg = e_invarg;
6708 }
6709 #endif
6710
6711 #ifdef FEAT_VIRTUALEDIT
6712 /* 'virtualedit' */
6713 else if (varp == &p_ve)
6714 {
6715 if (opt_strings_flags(p_ve, p_ve_values, &ve_flags, TRUE) != OK)
6716 errmsg = e_invarg;
6717 else if (STRCMP(p_ve, oldval) != 0)
6718 {
6719 /* Recompute cursor position in case the new 've' setting
6720 * changes something. */
6721 validate_virtcol();
6722 coladvance(curwin->w_virtcol);
6723 }
6724 }
6725 #endif
6726
6727 #if defined(FEAT_CSCOPE) && defined(FEAT_QUICKFIX)
6728 else if (varp == &p_csqf)
6729 {
6730 if (p_csqf != NULL)
6731 {
6732 p = p_csqf;
6733 while (*p != NUL)
6734 {
6735 if (vim_strchr((char_u *)CSQF_CMDS, *p) == NULL
6736 || p[1] == NUL
6737 || vim_strchr((char_u *)CSQF_FLAGS, p[1]) == NULL
6738 || (p[2] != NUL && p[2] != ','))
6739 {
6740 errmsg = e_invarg;
6741 break;
6742 }
6743 else if (p[2] == NUL)
6744 break;
6745 else
6746 p += 3;
6747 }
6748 }
6749 }
6750 #endif
6751
6752 /* Options that are a list of flags. */
6753 else
6754 {
6755 p = NULL;
6756 if (varp == &p_ww)
6757 p = (char_u *)WW_ALL;
6758 if (varp == &p_shm)
6759 p = (char_u *)SHM_ALL;
6760 else if (varp == &(p_cpo))
6761 p = (char_u *)CPO_ALL;
6762 else if (varp == &(curbuf->b_p_fo))
6763 p = (char_u *)FO_ALL;
6764 else if (varp == &p_mouse)
6765 {
6766 #ifdef FEAT_MOUSE
6767 p = (char_u *)MOUSE_ALL;
6768 #else
6769 if (*p_mouse != NUL)
6770 errmsg = (char_u *)N_("E538: No mouse support");
6771 #endif
6772 }
6773 #if defined(FEAT_GUI)
6774 else if (varp == &p_go)
6775 p = (char_u *)GO_ALL;
6776 #endif
6777 if (p != NULL)
6778 {
6779 for (s = *varp; *s; ++s)
6780 if (vim_strchr(p, *s) == NULL)
6781 {
6782 errmsg = illegal_char(errbuf, *s);
6783 break;
6784 }
6785 }
6786 }
6787
6788 /*
6789 * If error detected, restore the previous value.
6790 */
6791 if (errmsg != NULL)
6792 {
6793 if (new_value_alloced)
6794 free_string_option(*varp);
6795 *varp = oldval;
6796 /*
6797 * When resetting some values, need to act on it.
6798 */
6799 if (did_chartab)
6800 (void)init_chartab();
6801 if (varp == &p_hl)
6802 (void)highlight_changed();
6803 }
6804 else
6805 {
6806 #ifdef FEAT_EVAL
6807 /* Remember where the option was set. */
6808 set_option_scriptID_idx(opt_idx, opt_flags, current_SID);
6809 #endif
6810 /*
6811 * Free string options that are in allocated memory.
6812 * Use "free_oldval", because recursiveness may change the flags under
6813 * our fingers (esp. init_highlight()).
6814 */
6815 if (free_oldval)
6816 free_string_option(oldval);
6817 if (new_value_alloced)
6818 options[opt_idx].flags |= P_ALLOCED;
6819 else
6820 options[opt_idx].flags &= ~P_ALLOCED;
6821
6822 if ((opt_flags & (OPT_LOCAL | OPT_GLOBAL)) == 0
6823 && ((int)options[opt_idx].indir & PV_BOTH))
6824 {
6825 /* global option with local value set to use global value; free
6826 * the local value and make it empty */
6827 p = get_varp_scope(&(options[opt_idx]), OPT_LOCAL);
6828 free_string_option(*(char_u **)p);
6829 *(char_u **)p = empty_option;
6830 }
6831
6832 /* May set global value for local option. */
6833 else if (!(opt_flags & OPT_LOCAL) && opt_flags != OPT_GLOBAL)
6834 set_string_option_global(opt_idx, varp);
6835
6836 #ifdef FEAT_AUTOCMD
6837 /*
6838 * Trigger the autocommand only after setting the flags.
6839 */
6840 # ifdef FEAT_SYN_HL
6841 /* When 'syntax' is set, load the syntax of that name */
6842 if (varp == &(curbuf->b_p_syn))
6843 {
6844 apply_autocmds(EVENT_SYNTAX, curbuf->b_p_syn,
6845 curbuf->b_fname, TRUE, curbuf);
6846 }
6847 # endif
6848 else if (varp == &(curbuf->b_p_ft))
6849 {
6850 /* 'filetype' is set, trigger the FileType autocommand */
6851 did_filetype = TRUE;
6852 apply_autocmds(EVENT_FILETYPE, curbuf->b_p_ft,
6853 curbuf->b_fname, TRUE, curbuf);
6854 }
6855 #endif
6856 #ifdef FEAT_SPELL
6857 if (varp == &(curbuf->b_p_spl))
6858 {
6859 char_u fname[200];
6860
6861 /*
6862 * Source the spell/LANG.vim in 'runtimepath'.
6863 * They could set 'spellcapcheck' depending on the language.
6864 * Use the first name in 'spelllang' up to '_region' or
6865 * '.encoding'.
6866 */
6867 for (p = curbuf->b_p_spl; *p != NUL; ++p)
6868 if (vim_strchr((char_u *)"_.,", *p) != NULL)
6869 break;
6870 vim_snprintf((char *)fname, 200, "spell/%.*s.vim",
6871 (int)(p - curbuf->b_p_spl), curbuf->b_p_spl);
6872 source_runtime(fname, TRUE);
6873 }
6874 #endif
6875 }
6876
6877 #ifdef FEAT_MOUSE
6878 if (varp == &p_mouse)
6879 {
6880 # ifdef FEAT_MOUSE_TTY
6881 if (*p_mouse == NUL)
6882 mch_setmouse(FALSE); /* switch mouse off */
6883 else
6884 # endif
6885 setmouse(); /* in case 'mouse' changed */
6886 }
6887 #endif
6888
6889 if (curwin->w_curswant != MAXCOL)
6890 curwin->w_set_curswant = TRUE; /* in case 'showbreak' changed */
6891 #ifdef FEAT_GUI
6892 /* check redraw when it's not a GUI option or the GUI is active. */
6893 if (!redraw_gui_only || gui.in_use)
6894 #endif
6895 check_redraw(options[opt_idx].flags);
6896
6897 return errmsg;
6898 }
6899
6900 /*
6901 * Handle setting 'listchars' or 'fillchars'.
6902 * Returns error message, NULL if it's OK.
6903 */
6904 static char_u *
6905 set_chars_option(varp)
6906 char_u **varp;
6907 {
6908 int round, i, len, entries;
6909 char_u *p, *s;
6910 int c1, c2 = 0;
6911 struct charstab
6912 {
6913 int *cp;
6914 char *name;
6915 };
6916 #if defined(FEAT_WINDOWS) || defined(FEAT_FOLDING)
6917 static struct charstab filltab[] =
6918 {
6919 {&fill_stl, "stl"},
6920 {&fill_stlnc, "stlnc"},
6921 {&fill_vert, "vert"},
6922 {&fill_fold, "fold"},
6923 {&fill_diff, "diff"},
6924 };
6925 #endif
6926 static struct charstab lcstab[] =
6927 {
6928 {&lcs_eol, "eol"},
6929 {&lcs_ext, "extends"},
6930 {&lcs_nbsp, "nbsp"},
6931 {&lcs_prec, "precedes"},
6932 {&lcs_tab2, "tab"},
6933 {&lcs_trail, "trail"},
6934 };
6935 struct charstab *tab;
6936
6937 #if defined(FEAT_WINDOWS) || defined(FEAT_FOLDING)
6938 if (varp == &p_lcs)
6939 #endif
6940 {
6941 tab = lcstab;
6942 entries = sizeof(lcstab) / sizeof(struct charstab);
6943 }
6944 #if defined(FEAT_WINDOWS) || defined(FEAT_FOLDING)
6945 else
6946 {
6947 tab = filltab;
6948 entries = sizeof(filltab) / sizeof(struct charstab);
6949 }
6950 #endif
6951
6952 /* first round: check for valid value, second round: assign values */
6953 for (round = 0; round <= 1; ++round)
6954 {
6955 if (round)
6956 {
6957 /* After checking that the value is valid: set defaults: space for
6958 * 'fillchars', NUL for 'listchars' */
6959 for (i = 0; i < entries; ++i)
6960 *(tab[i].cp) = (varp == &p_lcs ? NUL : ' ');
6961 if (varp == &p_lcs)
6962 lcs_tab1 = NUL;
6963 #if defined(FEAT_WINDOWS) || defined(FEAT_FOLDING)
6964 else
6965 fill_diff = '-';
6966 #endif
6967 }
6968 p = *varp;
6969 while (*p)
6970 {
6971 for (i = 0; i < entries; ++i)
6972 {
6973 len = (int)STRLEN(tab[i].name);
6974 if (STRNCMP(p, tab[i].name, len) == 0
6975 && p[len] == ':'
6976 && p[len + 1] != NUL)
6977 {
6978 s = p + len + 1;
6979 #ifdef FEAT_MBYTE
6980 c1 = mb_ptr2char_adv(&s);
6981 if (mb_char2cells(c1) > 1)
6982 continue;
6983 #else
6984 c1 = *s++;
6985 #endif
6986 if (tab[i].cp == &lcs_tab2)
6987 {
6988 if (*s == NUL)
6989 continue;
6990 #ifdef FEAT_MBYTE
6991 c2 = mb_ptr2char_adv(&s);
6992 if (mb_char2cells(c2) > 1)
6993 continue;
6994 #else
6995 c2 = *s++;
6996 #endif
6997 }
6998 if (*s == ',' || *s == NUL)
6999 {
7000 if (round)
7001 {
7002 if (tab[i].cp == &lcs_tab2)
7003 {
7004 lcs_tab1 = c1;
7005 lcs_tab2 = c2;
7006 }
7007 else
7008 *(tab[i].cp) = c1;
7009
7010 }
7011 p = s;
7012 break;
7013 }
7014 }
7015 }
7016
7017 if (i == entries)
7018 return e_invarg;
7019 if (*p == ',')
7020 ++p;
7021 }
7022 }
7023
7024 return NULL; /* no error */
7025 }
7026
7027 #ifdef FEAT_STL_OPT
7028 /*
7029 * Check validity of options with the 'statusline' format.
7030 * Return error message or NULL.
7031 */
7032 char_u *
7033 check_stl_option(s)
7034 char_u *s;
7035 {
7036 int itemcnt = 0;
7037 int groupdepth = 0;
7038 static char_u errbuf[80];
7039
7040 while (*s && itemcnt < STL_MAX_ITEM)
7041 {
7042 /* Check for valid keys after % sequences */
7043 while (*s && *s != '%')
7044 s++;
7045 if (!*s)
7046 break;
7047 s++;
7048 if (*s != '%' && *s != ')')
7049 ++itemcnt;
7050 if (*s == '%' || *s == STL_TRUNCMARK || *s == STL_MIDDLEMARK)
7051 {
7052 s++;
7053 continue;
7054 }
7055 if (*s == ')')
7056 {
7057 s++;
7058 if (--groupdepth < 0)
7059 break;
7060 continue;
7061 }
7062 if (*s == '-')
7063 s++;
7064 while (VIM_ISDIGIT(*s))
7065 s++;
7066 if (*s == STL_USER_HL)
7067 continue;
7068 if (*s == '.')
7069 {
7070 s++;
7071 while (*s && VIM_ISDIGIT(*s))
7072 s++;
7073 }
7074 if (*s == '(')
7075 {
7076 groupdepth++;
7077 continue;
7078 }
7079 if (vim_strchr(STL_ALL, *s) == NULL)
7080 {
7081 return illegal_char(errbuf, *s);
7082 }
7083 if (*s == '{')
7084 {
7085 s++;
7086 while (*s != '}' && *s)
7087 s++;
7088 if (*s != '}')
7089 return (char_u *)N_("E540: Unclosed expression sequence");
7090 }
7091 }
7092 if (itemcnt >= STL_MAX_ITEM)
7093 return (char_u *)N_("E541: too many items");
7094 if (groupdepth != 0)
7095 return (char_u *)N_("E542: unbalanced groups");
7096 return NULL;
7097 }
7098 #endif
7099
7100 #ifdef FEAT_CLIPBOARD
7101 /*
7102 * Extract the items in the 'clipboard' option and set global values.
7103 */
7104 static char_u *
7105 check_clipboard_option()
7106 {
7107 int new_unnamed = FALSE;
7108 int new_autoselect = FALSE;
7109 int new_autoselectml = FALSE;
7110 int new_html = FALSE;
7111 regprog_T *new_exclude_prog = NULL;
7112 char_u *errmsg = NULL;
7113 char_u *p;
7114
7115 for (p = p_cb; *p != NUL; )
7116 {
7117 if (STRNCMP(p, "unnamed", 7) == 0 && (p[7] == ',' || p[7] == NUL))
7118 {
7119 new_unnamed = TRUE;
7120 p += 7;
7121 }
7122 else if (STRNCMP(p, "autoselect", 10) == 0
7123 && (p[10] == ',' || p[10] == NUL))
7124 {
7125 new_autoselect = TRUE;
7126 p += 10;
7127 }
7128 else if (STRNCMP(p, "autoselectml", 12) == 0
7129 && (p[12] == ',' || p[12] == NUL))
7130 {
7131 new_autoselectml = TRUE;
7132 p += 12;
7133 }
7134 else if (STRNCMP(p, "html", 4) == 0 && (p[4] == ',' || p[4] == NUL))
7135 {
7136 new_html = TRUE;
7137 p += 4;
7138 }
7139 else if (STRNCMP(p, "exclude:", 8) == 0 && new_exclude_prog == NULL)
7140 {
7141 p += 8;
7142 new_exclude_prog = vim_regcomp(p, RE_MAGIC);
7143 if (new_exclude_prog == NULL)
7144 errmsg = e_invarg;
7145 break;
7146 }
7147 else
7148 {
7149 errmsg = e_invarg;
7150 break;
7151 }
7152 if (*p == ',')
7153 ++p;
7154 }
7155 if (errmsg == NULL)
7156 {
7157 clip_unnamed = new_unnamed;
7158 clip_autoselect = new_autoselect;
7159 clip_autoselectml = new_autoselectml;
7160 clip_html = new_html;
7161 vim_free(clip_exclude_prog);
7162 clip_exclude_prog = new_exclude_prog;
7163 }
7164 else
7165 vim_free(new_exclude_prog);
7166
7167 return errmsg;
7168 }
7169 #endif
7170
7171 #ifdef FEAT_SPELL
7172 /*
7173 * Set curbuf->b_cap_prog to the regexp program for 'spellcapcheck'.
7174 * Return error message when failed, NULL when OK.
7175 */
7176 static char_u *
7177 compile_cap_prog(buf)
7178 buf_T *buf;
7179 {
7180 regprog_T *rp = buf->b_cap_prog;
7181 char_u *re;
7182
7183 if (*buf->b_p_spc == NUL)
7184 buf->b_cap_prog = NULL;
7185 else
7186 {
7187 /* Prepend a ^ so that we only match at one column */
7188 re = concat_str((char_u *)"^", buf->b_p_spc);
7189 if (re != NULL)
7190 {
7191 buf->b_cap_prog = vim_regcomp(re, RE_MAGIC);
7192 if (buf->b_cap_prog == NULL)
7193 {
7194 buf->b_cap_prog = rp; /* restore the previous program */
7195 return e_invarg;
7196 }
7197 vim_free(re);
7198 }
7199 }
7200
7201 vim_free(rp);
7202 return NULL;
7203 }
7204 #endif
7205
7206 #if defined(FEAT_EVAL) || defined(PROTO)
7207 /*
7208 * Set the scriptID for an option, taking care of setting the buffer- or
7209 * window-local value.
7210 */
7211 static void
7212 set_option_scriptID_idx(opt_idx, opt_flags, id)
7213 int opt_idx;
7214 int opt_flags;
7215 int id;
7216 {
7217 int both = (opt_flags & (OPT_LOCAL | OPT_GLOBAL)) == 0;
7218 int indir = (int)options[opt_idx].indir;
7219
7220 /* Remember where the option was set. For local options need to do that
7221 * in the buffer or window structure. */
7222 if (both || (opt_flags & OPT_GLOBAL) || (indir & (PV_BUF|PV_WIN)) == 0)
7223 options[opt_idx].scriptID = id;
7224 if (both || (opt_flags & OPT_LOCAL))
7225 {
7226 if (indir & PV_BUF)
7227 curbuf->b_p_scriptID[indir & PV_MASK] = id;
7228 else if (indir & PV_WIN)
7229 curwin->w_p_scriptID[indir & PV_MASK] = id;
7230 }
7231 }
7232 #endif
7233
7234 /*
7235 * Set the value of a boolean option, and take care of side effects.
7236 * Returns NULL for success, or an error message for an error.
7237 */
7238 static char_u *
7239 set_bool_option(opt_idx, varp, value, opt_flags)
7240 int opt_idx; /* index in options[] table */
7241 char_u *varp; /* pointer to the option variable */
7242 int value; /* new value */
7243 int opt_flags; /* OPT_LOCAL and/or OPT_GLOBAL */
7244 {
7245 int old_value = *(int *)varp;
7246
7247 /* Disallow changing some options from secure mode */
7248 if ((secure
7249 #ifdef HAVE_SANDBOX
7250 || sandbox != 0
7251 #endif
7252 ) && (options[opt_idx].flags & P_SECURE))
7253 return e_secure;
7254
7255 *(int *)varp = value; /* set the new value */
7256 #ifdef FEAT_EVAL
7257 /* Remember where the option was set. */
7258 set_option_scriptID_idx(opt_idx, opt_flags, current_SID);
7259 #endif
7260
7261 #ifdef FEAT_GUI
7262 need_mouse_correct = TRUE;
7263 #endif
7264
7265 /* May set global value for local option. */
7266 if ((opt_flags & (OPT_LOCAL | OPT_GLOBAL)) == 0)
7267 *(int *)get_varp_scope(&(options[opt_idx]), OPT_GLOBAL) = value;
7268
7269 /*
7270 * Handle side effects of changing a bool option.
7271 */
7272
7273 /* 'compatible' */
7274 if ((int *)varp == &p_cp)
7275 {
7276 compatible_set();
7277 }
7278
7279 else if ((int *)varp == &curbuf->b_p_ro)
7280 {
7281 /* when 'readonly' is reset globally, also reset readonlymode */
7282 if (!curbuf->b_p_ro && (opt_flags & OPT_LOCAL) == 0)
7283 readonlymode = FALSE;
7284
7285 /* when 'readonly' is set may give W10 again */
7286 if (curbuf->b_p_ro)
7287 curbuf->b_did_warn = FALSE;
7288
7289 #ifdef FEAT_TITLE
7290 redraw_titles();
7291 #endif
7292 }
7293
7294 #ifdef FEAT_TITLE
7295 /* when 'modifiable' is changed, redraw the window title */
7296 else if ((int *)varp == &curbuf->b_p_ma)
7297 {
7298 redraw_titles();
7299 }
7300 /* when 'endofline' is changed, redraw the window title */
7301 else if ((int *)varp == &curbuf->b_p_eol)
7302 {
7303 redraw_titles();
7304 }
7305 # ifdef FEAT_MBYTE
7306 /* when 'bomb' is changed, redraw the window title and tab page text */
7307 else if ((int *)varp == &curbuf->b_p_bomb)
7308 {
7309 redraw_titles();
7310 }
7311 # endif
7312 #endif
7313
7314 /* when 'bin' is set also set some other options */
7315 else if ((int *)varp == &curbuf->b_p_bin)
7316 {
7317 set_options_bin(old_value, curbuf->b_p_bin, opt_flags);
7318 #ifdef FEAT_TITLE
7319 redraw_titles();
7320 #endif
7321 }
7322
7323 #ifdef FEAT_AUTOCMD
7324 /* when 'buflisted' changes, trigger autocommands */
7325 else if ((int *)varp == &curbuf->b_p_bl && old_value != curbuf->b_p_bl)
7326 {
7327 apply_autocmds(curbuf->b_p_bl ? EVENT_BUFADD : EVENT_BUFDELETE,
7328 NULL, NULL, TRUE, curbuf);
7329 }
7330 #endif
7331
7332 /* when 'swf' is set, create swapfile, when reset remove swapfile */
7333 else if ((int *)varp == &curbuf->b_p_swf)
7334 {
7335 if (curbuf->b_p_swf && p_uc)
7336 ml_open_file(curbuf); /* create the swap file */
7337 else
7338 /* no need to reset curbuf->b_may_swap, ml_open_file() will check
7339 * buf->b_p_swf */
7340 mf_close_file(curbuf, TRUE); /* remove the swap file */
7341 }
7342
7343 /* when 'terse' is set change 'shortmess' */
7344 else if ((int *)varp == &p_terse)
7345 {
7346 char_u *p;
7347
7348 p = vim_strchr(p_shm, SHM_SEARCH);
7349
7350 /* insert 's' in p_shm */
7351 if (p_terse && p == NULL)
7352 {
7353 STRCPY(IObuff, p_shm);
7354 STRCAT(IObuff, "s");
7355 set_string_option_direct((char_u *)"shm", -1, IObuff, OPT_FREE, 0);
7356 }
7357 /* remove 's' from p_shm */
7358 else if (!p_terse && p != NULL)
7359 STRMOVE(p, p + 1);
7360 }
7361
7362 /* when 'paste' is set or reset also change other options */
7363 else if ((int *)varp == &p_paste)
7364 {
7365 paste_option_changed();
7366 }
7367
7368 /* when 'insertmode' is set from an autocommand need to do work here */
7369 else if ((int *)varp == &p_im)
7370 {
7371 if (p_im)
7372 {
7373 if ((State & INSERT) == 0)
7374 need_start_insertmode = TRUE;
7375 stop_insert_mode = FALSE;
7376 }
7377 else
7378 {
7379 need_start_insertmode = FALSE;
7380 stop_insert_mode = TRUE;
7381 if (restart_edit != 0 && mode_displayed)
7382 clear_cmdline = TRUE; /* remove "(insert)" */
7383 restart_edit = 0;
7384 }
7385 }
7386
7387 /* when 'ignorecase' is set or reset and 'hlsearch' is set, redraw */
7388 else if ((int *)varp == &p_ic && p_hls)
7389 {
7390 redraw_all_later(SOME_VALID);
7391 }
7392
7393 #ifdef FEAT_SEARCH_EXTRA
7394 /* when 'hlsearch' is set or reset: reset no_hlsearch */
7395 else if ((int *)varp == &p_hls)
7396 {
7397 no_hlsearch = FALSE;
7398 }
7399 #endif
7400
7401 #ifdef FEAT_SCROLLBIND
7402 /* when 'scrollbind' is set: snapshot the current position to avoid a jump
7403 * at the end of normal_cmd() */
7404 else if ((int *)varp == &curwin->w_p_scb)
7405 {
7406 if (curwin->w_p_scb)
7407 do_check_scrollbind(FALSE);
7408 }
7409 #endif
7410
7411 #if defined(FEAT_WINDOWS) && defined(FEAT_QUICKFIX)
7412 /* There can be only one window with 'previewwindow' set. */
7413 else if ((int *)varp == &curwin->w_p_pvw)
7414 {
7415 if (curwin->w_p_pvw)
7416 {
7417 win_T *win;
7418
7419 for (win = firstwin; win != NULL; win = win->w_next)
7420 if (win->w_p_pvw && win != curwin)
7421 {
7422 curwin->w_p_pvw = FALSE;
7423 return (char_u *)N_("E590: A preview window already exists");
7424 }
7425 }
7426 }
7427 #endif
7428
7429 /* when 'textmode' is set or reset also change 'fileformat' */
7430 else if ((int *)varp == &curbuf->b_p_tx)
7431 {
7432 set_fileformat(curbuf->b_p_tx ? EOL_DOS : EOL_UNIX, opt_flags);
7433 }
7434
7435 #ifdef FEAT_FULLSCREEN
7436 /* when 'fullscreen' changes, forward it to the gui */
7437 else if ((int *)varp == &p_fullscreen && gui.in_use)
7438 {
7439 if (p_fullscreen && !old_value)
7440 {
7441 guicolor_T fg, bg;
7442 if (fuoptions_flags & FUOPT_BGCOLOR_HLGROUP)
7443 {
7444 /* Find out background color from colorscheme
7445 * via highlight group id */
7446 syn_id2colors(fuoptions_bgcolor, &fg, &bg);
7447 }
7448 else
7449 {
7450 /* set explicit background color */
7451 bg = fuoptions_bgcolor;
7452 }
7453 gui_mch_enter_fullscreen(fuoptions_flags, bg);
7454 }
7455 else if (!p_fullscreen && old_value)
7456 {
7457 gui_mch_leave_fullscreen();
7458 }
7459 }
7460 #endif
7461
7462 #if defined(FEAT_ANTIALIAS) && defined(FEAT_GUI_MACVIM)
7463 else if ((int *)varp == &p_antialias)
7464 {
7465 gui_macvim_set_antialias(p_antialias);
7466 }
7467 #endif
7468
7469 /* when 'textauto' is set or reset also change 'fileformats' */
7470 else if ((int *)varp == &p_ta)
7471 set_string_option_direct((char_u *)"ffs", -1,
7472 p_ta ? (char_u *)DFLT_FFS_VIM : (char_u *)"",
7473 OPT_FREE | opt_flags, 0);
7474
7475 /*
7476 * When 'lisp' option changes include/exclude '-' in
7477 * keyword characters.
7478 */
7479 #ifdef FEAT_LISP
7480 else if (varp == (char_u *)&(curbuf->b_p_lisp))
7481 {
7482 (void)buf_init_chartab(curbuf, FALSE); /* ignore errors */
7483 }
7484 #endif
7485
7486 #ifdef FEAT_TITLE
7487 /* when 'title' changed, may need to change the title; same for 'icon' */
7488 else if ((int *)varp == &p_title)
7489 {
7490 did_set_title(FALSE);
7491 }
7492
7493 else if ((int *)varp == &p_icon)
7494 {
7495 did_set_title(TRUE);
7496 }
7497 #endif
7498
7499 else if ((int *)varp == &curbuf->b_changed)
7500 {
7501 if (!value)
7502 save_file_ff(curbuf); /* Buffer is unchanged */
7503 #ifdef FEAT_TITLE
7504 redraw_titles();
7505 #endif
7506 #ifdef FEAT_AUTOCMD
7507 modified_was_set = value;
7508 #endif
7509 }
7510
7511 #ifdef BACKSLASH_IN_FILENAME
7512 else if ((int *)varp == &p_ssl)
7513 {
7514 if (p_ssl)
7515 {
7516 psepc = '/';
7517 psepcN = '\\';
7518 pseps[0] = '/';
7519 }
7520 else
7521 {
7522 psepc = '\\';
7523 psepcN = '/';
7524 pseps[0] = '\\';
7525 }
7526
7527 /* need to adjust the file name arguments and buffer names. */
7528 buflist_slash_adjust();
7529 alist_slash_adjust();
7530 # ifdef FEAT_EVAL
7531 scriptnames_slash_adjust();
7532 # endif
7533 }
7534 #endif
7535
7536 /* If 'wrap' is set, set w_leftcol to zero. */
7537 else if ((int *)varp == &curwin->w_p_wrap)
7538 {
7539 if (curwin->w_p_wrap)
7540 curwin->w_leftcol = 0;
7541 }
7542
7543 #ifdef FEAT_WINDOWS
7544 else if ((int *)varp == &p_ea)
7545 {
7546 if (p_ea && !old_value)
7547 win_equal(curwin, FALSE, 0);
7548 }
7549 #endif
7550
7551 else if ((int *)varp == &p_wiv)
7552 {
7553 /*
7554 * When 'weirdinvert' changed, set/reset 't_xs'.
7555 * Then set 'weirdinvert' according to value of 't_xs'.
7556 */
7557 if (p_wiv && !old_value)
7558 T_XS = (char_u *)"y";
7559 else if (!p_wiv && old_value)
7560 T_XS = empty_option;
7561 p_wiv = (*T_XS != NUL);
7562 }
7563
7564 #ifdef FEAT_BEVAL
7565 else if ((int *)varp == &p_beval)
7566 {
7567 if (p_beval == TRUE)
7568 gui_mch_enable_beval_area(balloonEval);
7569 else
7570 gui_mch_disable_beval_area(balloonEval);
7571 }
7572 #endif
7573
7574 #ifdef FEAT_AUTOCHDIR
7575 else if ((int *)varp == &p_acd)
7576 {
7577 /* Change directories when the 'acd' option is set now. */
7578 DO_AUTOCHDIR
7579 }
7580 #endif
7581
7582 #ifdef FEAT_DIFF
7583 /* 'diff' */
7584 else if ((int *)varp == &curwin->w_p_diff)
7585 {
7586 /* May add or remove the buffer from the list of diff buffers. */
7587 diff_buf_adjust(curwin);
7588 # ifdef FEAT_FOLDING
7589 if (foldmethodIsDiff(curwin))
7590 foldUpdateAll(curwin);
7591 # endif
7592 }
7593 #endif
7594
7595 #ifdef USE_IM_CONTROL
7596 /* 'imdisable' */
7597 else if ((int *)varp == &p_imdisable)
7598 {
7599 /* Only de-activate it here, it will be enabled when changing mode. */
7600 if (p_imdisable)
7601 im_set_active(FALSE);
7602 #ifdef FEAT_GUI_MACVIM
7603 im_set_control(!p_imdisable);
7604 #endif
7605 }
7606 #endif
7607
7608 #ifdef FEAT_SPELL
7609 /* 'spell' */
7610 else if ((int *)varp == &curwin->w_p_spell)
7611 {
7612 if (curwin->w_p_spell)
7613 {
7614 char_u *errmsg = did_set_spelllang(curbuf);
7615
7616 if (errmsg != NULL)
7617 EMSG(_(errmsg));
7618 }
7619 }
7620 #endif
7621
7622 #ifdef FEAT_FKMAP
7623 else if ((int *)varp == &p_altkeymap)
7624 {
7625 if (old_value != p_altkeymap)
7626 {
7627 if (!p_altkeymap)
7628 {
7629 p_hkmap = p_fkmap;
7630 p_fkmap = 0;
7631 }
7632 else
7633 {
7634 p_fkmap = p_hkmap;
7635 p_hkmap = 0;
7636 }
7637 (void)init_chartab();
7638 }
7639 }
7640
7641 /*
7642 * In case some second language keymapping options have changed, check
7643 * and correct the setting in a consistent way.
7644 */
7645
7646 /*
7647 * If hkmap or fkmap are set, reset Arabic keymapping.
7648 */
7649 if ((p_hkmap || p_fkmap) && p_altkeymap)
7650 {
7651 p_altkeymap = p_fkmap;
7652 # ifdef FEAT_ARABIC
7653 curwin->w_p_arab = FALSE;
7654 # endif
7655 (void)init_chartab();
7656 }
7657
7658 /*
7659 * If hkmap set, reset Farsi keymapping.
7660 */
7661 if (p_hkmap && p_altkeymap)
7662 {
7663 p_altkeymap = 0;
7664 p_fkmap = 0;
7665 # ifdef FEAT_ARABIC
7666 curwin->w_p_arab = FALSE;
7667 # endif
7668 (void)init_chartab();
7669 }
7670
7671 /*
7672 * If fkmap set, reset Hebrew keymapping.
7673 */
7674 if (p_fkmap && !p_altkeymap)
7675 {
7676 p_altkeymap = 1;
7677 p_hkmap = 0;
7678 # ifdef FEAT_ARABIC
7679 curwin->w_p_arab = FALSE;
7680 # endif
7681 (void)init_chartab();
7682 }
7683 #endif
7684
7685 #ifdef FEAT_ARABIC
7686 if ((int *)varp == &curwin->w_p_arab)
7687 {
7688 if (curwin->w_p_arab)
7689 {
7690 /*
7691 * 'arabic' is set, handle various sub-settings.
7692 */
7693 if (!p_tbidi)
7694 {
7695 /* set rightleft mode */
7696 if (!curwin->w_p_rl)
7697 {
7698 curwin->w_p_rl = TRUE;
7699 changed_window_setting();
7700 }
7701
7702 /* Enable Arabic shaping (major part of what Arabic requires) */
7703 if (!p_arshape)
7704 {
7705 p_arshape = TRUE;
7706 redraw_later_clear();
7707 }
7708 }
7709
7710 /* Arabic requires a utf-8 encoding, inform the user if its not
7711 * set. */
7712 if (STRCMP(p_enc, "utf-8") != 0)
7713 {
7714 static char *w_arabic = N_("W17: Arabic requires UTF-8, do ':set encoding=utf-8'");
7715
7716 msg_source(hl_attr(HLF_W));
7717 MSG_ATTR(_(w_arabic), hl_attr(HLF_W));
7718 #ifdef FEAT_EVAL
7719 set_vim_var_string(VV_WARNINGMSG, (char_u *)_(w_arabic), -1);
7720 #endif
7721 }
7722
7723 # ifdef FEAT_MBYTE
7724 /* set 'delcombine' */
7725 p_deco = TRUE;
7726 # endif
7727
7728 # ifdef FEAT_KEYMAP
7729 /* Force-set the necessary keymap for arabic */
7730 set_option_value((char_u *)"keymap", 0L, (char_u *)"arabic",
7731 OPT_LOCAL);
7732 # endif
7733 # ifdef FEAT_FKMAP
7734 p_altkeymap = 0;
7735 p_hkmap = 0;
7736 p_fkmap = 0;
7737 (void)init_chartab();
7738 # endif
7739 }
7740 else
7741 {
7742 /*
7743 * 'arabic' is reset, handle various sub-settings.
7744 */
7745 if (!p_tbidi)
7746 {
7747 /* reset rightleft mode */
7748 if (curwin->w_p_rl)
7749 {
7750 curwin->w_p_rl = FALSE;
7751 changed_window_setting();
7752 }
7753
7754 /* 'arabicshape' isn't reset, it is a global option and
7755 * another window may still need it "on". */
7756 }
7757
7758 /* 'delcombine' isn't reset, it is a global option and another
7759 * window may still want it "on". */
7760
7761 # ifdef FEAT_KEYMAP
7762 /* Revert to the default keymap */
7763 curbuf->b_p_iminsert = B_IMODE_NONE;
7764 curbuf->b_p_imsearch = B_IMODE_USE_INSERT;
7765 # endif
7766 }
7767 }
7768 #endif
7769
7770 /*
7771 * End of handling side effects for bool options.
7772 */
7773
7774 options[opt_idx].flags |= P_WAS_SET;
7775
7776 comp_col(); /* in case 'ruler' or 'showcmd' changed */
7777 if (curwin->w_curswant != MAXCOL)
7778 curwin->w_set_curswant = TRUE; /* in case 'list' changed */
7779 check_redraw(options[opt_idx].flags);
7780
7781 return NULL;
7782 }
7783
7784 /*
7785 * Set the value of a number option, and take care of side effects.
7786 * Returns NULL for success, or an error message for an error.
7787 */
7788 static char_u *
7789 set_num_option(opt_idx, varp, value, errbuf, errbuflen, opt_flags)
7790 int opt_idx; /* index in options[] table */
7791 char_u *varp; /* pointer to the option variable */
7792 long value; /* new value */
7793 char_u *errbuf; /* buffer for error messages */
7794 size_t errbuflen; /* length of "errbuf" */
7795 int opt_flags; /* OPT_LOCAL, OPT_GLOBAL and
7796 OPT_MODELINE */
7797 {
7798 char_u *errmsg = NULL;
7799 long old_value = *(long *)varp;
7800 long old_Rows = Rows; /* remember old Rows */
7801 long old_Columns = Columns; /* remember old Columns */
7802 long *pp = (long *)varp;
7803
7804 /* Disallow changing some options from secure mode. */
7805 if ((secure
7806 #ifdef HAVE_SANDBOX
7807 || sandbox != 0
7808 #endif
7809 ) && (options[opt_idx].flags & P_SECURE))
7810 return e_secure;
7811
7812 *pp = value;
7813 #ifdef FEAT_EVAL
7814 /* Remember where the option was set. */
7815 set_option_scriptID_idx(opt_idx, opt_flags, current_SID);
7816 #endif
7817 #ifdef FEAT_GUI
7818 need_mouse_correct = TRUE;
7819 #endif
7820
7821 if (curbuf->b_p_sw <= 0)
7822 {
7823 errmsg = e_positive;
7824 curbuf->b_p_sw = curbuf->b_p_ts;
7825 }
7826
7827 /*
7828 * Number options that need some action when changed
7829 */
7830 #ifdef FEAT_WINDOWS
7831 if (pp == &p_wh || pp == &p_hh)
7832 {
7833 if (p_wh < 1)
7834 {
7835 errmsg = e_positive;
7836 p_wh = 1;
7837 }
7838 if (p_wmh > p_wh)
7839 {
7840 errmsg = e_winheight;
7841 p_wh = p_wmh;
7842 }
7843 if (p_hh < 0)
7844 {
7845 errmsg = e_positive;
7846 p_hh = 0;
7847 }
7848
7849 /* Change window height NOW */
7850 if (lastwin != firstwin)
7851 {
7852 if (pp == &p_wh && curwin->w_height < p_wh)
7853 win_setheight((int)p_wh);
7854 if (pp == &p_hh && curbuf->b_help && curwin->w_height < p_hh)
7855 win_setheight((int)p_hh);
7856 }
7857 }
7858
7859 /* 'winminheight' */
7860 else if (pp == &p_wmh)
7861 {
7862 if (p_wmh < 0)
7863 {
7864 errmsg = e_positive;
7865 p_wmh = 0;
7866 }
7867 if (p_wmh > p_wh)
7868 {
7869 errmsg = e_winheight;
7870 p_wmh = p_wh;
7871 }
7872 win_setminheight();
7873 }
7874
7875 # ifdef FEAT_VERTSPLIT
7876 else if (pp == &p_wiw)
7877 {
7878 if (p_wiw < 1)
7879 {
7880 errmsg = e_positive;
7881 p_wiw = 1;
7882 }
7883 if (p_wmw > p_wiw)
7884 {
7885 errmsg = e_winwidth;
7886 p_wiw = p_wmw;
7887 }
7888
7889 /* Change window width NOW */
7890 if (lastwin != firstwin && curwin->w_width < p_wiw)
7891 win_setwidth((int)p_wiw);
7892 }
7893
7894 /* 'winminwidth' */
7895 else if (pp == &p_wmw)
7896 {
7897 if (p_wmw < 0)
7898 {
7899 errmsg = e_positive;
7900 p_wmw = 0;
7901 }
7902 if (p_wmw > p_wiw)
7903 {
7904 errmsg = e_winwidth;
7905 p_wmw = p_wiw;
7906 }
7907 win_setminheight();
7908 }
7909 # endif
7910
7911 #endif
7912
7913 #ifdef FEAT_WINDOWS
7914 /* (re)set last window status line */
7915 else if (pp == &p_ls)
7916 {
7917 last_status(FALSE);
7918 }
7919
7920 /* (re)set tab page line */
7921 else if (pp == &p_stal)
7922 {
7923 shell_new_rows(); /* recompute window positions and heights */
7924 }
7925 #endif
7926
7927 #ifdef FEAT_GUI
7928 else if (pp == &p_linespace)
7929 {
7930 /* Recompute gui.char_height and resize the Vim window to keep the
7931 * same number of lines. */
7932 if (gui.in_use && gui_mch_adjust_charheight() == OK)
7933 gui_set_shellsize(FALSE, FALSE, RESIZE_VERT);
7934 }
7935 #endif
7936
7937 #ifdef FEAT_FOLDING
7938 /* 'foldlevel' */
7939 else if (pp == &curwin->w_p_fdl)
7940 {
7941 if (curwin->w_p_fdl < 0)
7942 curwin->w_p_fdl = 0;
7943 newFoldLevel();
7944 }
7945
7946 /* 'foldminlines' */
7947 else if (pp == &curwin->w_p_fml)
7948 {
7949 foldUpdateAll(curwin);
7950 }
7951
7952 /* 'foldnestmax' */
7953 else if (pp == &curwin->w_p_fdn)
7954 {
7955 if (foldmethodIsSyntax(curwin) || foldmethodIsIndent(curwin))
7956 foldUpdateAll(curwin);
7957 }
7958
7959 /* 'foldcolumn' */
7960 else if (pp == &curwin->w_p_fdc)
7961 {
7962 if (curwin->w_p_fdc < 0)
7963 {
7964 errmsg = e_positive;
7965 curwin->w_p_fdc = 0;
7966 }
7967 else if (curwin->w_p_fdc > 12)
7968 {
7969 errmsg = e_invarg;
7970 curwin->w_p_fdc = 12;
7971 }
7972 }
7973
7974 /* 'shiftwidth' or 'tabstop' */
7975 else if (pp == &curbuf->b_p_sw || pp == &curbuf->b_p_ts)
7976 {
7977 if (foldmethodIsIndent(curwin))
7978 foldUpdateAll(curwin);
7979 }
7980 #endif /* FEAT_FOLDING */
7981
7982 #ifdef FEAT_MBYTE
7983 /* 'maxcombine' */
7984 else if (pp == &p_mco)
7985 {
7986 if (p_mco > MAX_MCO)
7987 p_mco = MAX_MCO;
7988 else if (p_mco < 0)
7989 p_mco = 0;
7990 screenclear(); /* will re-allocate the screen */
7991 }
7992 #endif
7993
7994 else if (pp == &curbuf->b_p_iminsert)
7995 {
7996 if (curbuf->b_p_iminsert < 0 || curbuf->b_p_iminsert > B_IMODE_LAST)
7997 {
7998 errmsg = e_invarg;
7999 curbuf->b_p_iminsert = B_IMODE_NONE;
8000 }
8001 p_iminsert = curbuf->b_p_iminsert;
8002 if (termcap_active) /* don't do this in the alternate screen */
8003 showmode();
8004 #if defined(FEAT_WINDOWS) && defined(FEAT_KEYMAP)
8005 /* Show/unshow value of 'keymap' in status lines. */
8006 status_redraw_curbuf();
8007 #endif
8008 }
8009
8010 else if (pp == &p_window)
8011 {
8012 if (p_window < 1)
8013 p_window = 1;
8014 else if (p_window >= Rows)
8015 p_window = Rows - 1;
8016 }
8017
8018 else if (pp == &curbuf->b_p_imsearch)
8019 {
8020 if (curbuf->b_p_imsearch < -1 || curbuf->b_p_imsearch > B_IMODE_LAST)
8021 {
8022 errmsg = e_invarg;
8023 curbuf->b_p_imsearch = B_IMODE_NONE;
8024 }
8025 p_imsearch = curbuf->b_p_imsearch;
8026 }
8027
8028 #ifdef FEAT_TITLE
8029 /* if 'titlelen' has changed, redraw the title */
8030 else if (pp == &p_titlelen)
8031 {
8032 if (p_titlelen < 0)
8033 {
8034 errmsg = e_positive;
8035 p_titlelen = 85;
8036 }
8037 if (starting != NO_SCREEN && old_value != p_titlelen)
8038 need_maketitle = TRUE;
8039 }
8040 #endif
8041
8042 /* if p_ch changed value, change the command line height */
8043 else if (pp == &p_ch)
8044 {
8045 if (p_ch < 1)
8046 {
8047 errmsg = e_positive;
8048 p_ch = 1;
8049 }
8050 if (p_ch > Rows - min_rows() + 1)
8051 p_ch = Rows - min_rows() + 1;
8052
8053 /* Only compute the new window layout when startup has been
8054 * completed. Otherwise the frame sizes may be wrong. */
8055 if (p_ch != old_value && full_screen
8056 #ifdef FEAT_GUI
8057 && !gui.starting
8058 #endif
8059 )
8060 command_height();
8061 }
8062
8063 /* when 'updatecount' changes from zero to non-zero, open swap files */
8064 else if (pp == &p_uc)
8065 {
8066 if (p_uc < 0)
8067 {
8068 errmsg = e_positive;
8069 p_uc = 100;
8070 }
8071 if (p_uc && !old_value)
8072 ml_open_files();
8073 }
8074 #ifdef MZSCHEME_GUI_THREADS
8075 else if (pp == &p_mzq)
8076 mzvim_reset_timer();
8077 #endif
8078
8079 /* sync undo before 'undolevels' changes */
8080 else if (pp == &p_ul)
8081 {
8082 /* use the old value, otherwise u_sync() may not work properly */
8083 p_ul = old_value;
8084 u_sync(TRUE);
8085 p_ul = value;
8086 }
8087
8088 #ifdef FEAT_LINEBREAK
8089 /* 'numberwidth' must be positive */
8090 else if (pp == &curwin->w_p_nuw)
8091 {
8092 if (curwin->w_p_nuw < 1)
8093 {
8094 errmsg = e_positive;
8095 curwin->w_p_nuw = 1;
8096 }
8097 if (curwin->w_p_nuw > 10)
8098 {
8099 errmsg = e_invarg;
8100 curwin->w_p_nuw = 10;
8101 }
8102 curwin->w_nrwidth_line_count = 0;
8103 }
8104 #endif
8105
8106 #if defined(FEAT_TRANSPARENCY)
8107 /* 'transparency' is a number between 0 and 100 */
8108 else if (pp == &p_transp)
8109 {
8110 if (p_transp < 0 || p_transp > 100)
8111 {
8112 errmsg = e_invarg;
8113 p_transp = old_value;
8114 }
8115 else if (gui.in_use)
8116 gui_mch_new_colors();
8117 }
8118 #endif
8119
8120 /*
8121 * Check the bounds for numeric options here
8122 */
8123 if (Rows < min_rows() && full_screen)
8124 {
8125 if (errbuf != NULL)
8126 {
8127 vim_snprintf((char *)errbuf, errbuflen,
8128 _("E593: Need at least %d lines"), min_rows());
8129 errmsg = errbuf;
8130 }
8131 Rows = min_rows();
8132 }
8133 if (Columns < MIN_COLUMNS && full_screen)
8134 {
8135 if (errbuf != NULL)
8136 {
8137 vim_snprintf((char *)errbuf, errbuflen,
8138 _("E594: Need at least %d columns"), MIN_COLUMNS);
8139 errmsg = errbuf;
8140 }
8141 Columns = MIN_COLUMNS;
8142 }
8143 /* Limit the values to avoid an overflow in Rows * Columns. */
8144 if (Columns > 10000)
8145 Columns = 10000;
8146 if (Rows > 1000)
8147 Rows = 1000;
8148
8149 #ifdef DJGPP
8150 /* avoid a crash by checking for a too large value of 'columns' */
8151 if (old_Columns != Columns && full_screen && term_console)
8152 mch_check_columns();
8153 #endif
8154
8155 /*
8156 * If the screen (shell) height has been changed, assume it is the
8157 * physical screenheight.
8158 */
8159 if (old_Rows != Rows || old_Columns != Columns)
8160 {
8161 /* Changing the screen size is not allowed while updating the screen. */
8162 if (updating_screen)
8163 *pp = old_value;
8164 else if (full_screen
8165 #ifdef FEAT_GUI
8166 && !gui.starting
8167 #endif
8168 )
8169 set_shellsize((int)Columns, (int)Rows, TRUE);
8170 else
8171 {
8172 /* Postpone the resizing; check the size and cmdline position for
8173 * messages. */
8174 check_shellsize();
8175 if (cmdline_row > Rows - p_ch && Rows > p_ch)
8176 cmdline_row = Rows - p_ch;
8177 }
8178 if (p_window >= Rows || !option_was_set((char_u *)"window"))
8179 p_window = Rows - 1;
8180 }
8181
8182 if (curbuf->b_p_sts < 0)
8183 {
8184 errmsg = e_positive;
8185 curbuf->b_p_sts = 0;
8186 }
8187 if (curbuf->b_p_ts <= 0)
8188 {
8189 errmsg = e_positive;
8190 curbuf->b_p_ts = 8;
8191 }
8192 if (curbuf->b_p_tw < 0)
8193 {
8194 errmsg = e_positive;
8195 curbuf->b_p_tw = 0;
8196 }
8197 if (p_tm < 0)
8198 {
8199 errmsg = e_positive;
8200 p_tm = 0;
8201 }
8202 if ((curwin->w_p_scr <= 0
8203 || (curwin->w_p_scr > curwin->w_height
8204 && curwin->w_height > 0))
8205 && full_screen)
8206 {
8207 if (pp == &(curwin->w_p_scr))
8208 {
8209 if (curwin->w_p_scr != 0)
8210 errmsg = e_scroll;
8211 win_comp_scroll(curwin);
8212 }
8213 /* If 'scroll' became invalid because of a side effect silently adjust
8214 * it. */
8215 else if (curwin->w_p_scr <= 0)
8216 curwin->w_p_scr = 1;
8217 else /* curwin->w_p_scr > curwin->w_height */
8218 curwin->w_p_scr = curwin->w_height;
8219 }
8220 if (p_hi < 0)
8221 {
8222 errmsg = e_positive;
8223 p_hi = 0;
8224 }
8225 if (p_report < 0)
8226 {
8227 errmsg = e_positive;
8228 p_report = 1;
8229 }
8230 if ((p_sj < -100 || p_sj >= Rows) && full_screen)
8231 {
8232 if (Rows != old_Rows) /* Rows changed, just adjust p_sj */
8233 p_sj = Rows / 2;
8234 else
8235 {
8236 errmsg = e_scroll;
8237 p_sj = 1;
8238 }
8239 }
8240 if (p_so < 0 && full_screen)
8241 {
8242 errmsg = e_scroll;
8243 p_so = 0;
8244 }
8245 if (p_siso < 0 && full_screen)
8246 {
8247 errmsg = e_positive;
8248 p_siso = 0;
8249 }
8250 #ifdef FEAT_CMDWIN
8251 if (p_cwh < 1)
8252 {
8253 errmsg = e_positive;
8254 p_cwh = 1;
8255 }
8256 #endif
8257 if (p_ut < 0)
8258 {
8259 errmsg = e_positive;
8260 p_ut = 2000;
8261 }
8262 if (p_ss < 0)
8263 {
8264 errmsg = e_positive;
8265 p_ss = 0;
8266 }
8267
8268 /* May set global value for local option. */
8269 if ((opt_flags & (OPT_LOCAL | OPT_GLOBAL)) == 0)
8270 *(long *)get_varp_scope(&(options[opt_idx]), OPT_GLOBAL) = *pp;
8271
8272 options[opt_idx].flags |= P_WAS_SET;
8273
8274 comp_col(); /* in case 'columns' or 'ls' changed */
8275 if (curwin->w_curswant != MAXCOL)
8276 curwin->w_set_curswant = TRUE; /* in case 'tabstop' changed */
8277 check_redraw(options[opt_idx].flags);
8278
8279 return errmsg;
8280 }
8281
8282 /*
8283 * Called after an option changed: check if something needs to be redrawn.
8284 */
8285 static void
8286 check_redraw(flags)
8287 long_u flags;
8288 {
8289 /* Careful: P_RCLR and P_RALL are a combination of other P_ flags */
8290 int clear = (flags & P_RCLR) == P_RCLR;
8291 int all = ((flags & P_RALL) == P_RALL || clear);
8292
8293 #ifdef FEAT_WINDOWS
8294 if ((flags & P_RSTAT) || all) /* mark all status lines dirty */
8295 status_redraw_all();
8296 #endif
8297
8298 if ((flags & P_RBUF) || (flags & P_RWIN) || all)
8299 changed_window_setting();
8300 if (flags & P_RBUF)
8301 redraw_curbuf_later(NOT_VALID);
8302 if (clear)
8303 redraw_all_later(CLEAR);
8304 else if (all)
8305 redraw_all_later(NOT_VALID);
8306 }
8307
8308 /*
8309 * Find index for option 'arg'.
8310 * Return -1 if not found.
8311 */
8312 static int
8313 findoption(arg)
8314 char_u *arg;
8315 {
8316 int opt_idx;
8317 char *s, *p;
8318 static short quick_tab[27] = {0, 0}; /* quick access table */
8319 int is_term_opt;
8320
8321 /*
8322 * For first call: Initialize the quick-access table.
8323 * It contains the index for the first option that starts with a certain
8324 * letter. There are 26 letters, plus the first "t_" option.
8325 */
8326 if (quick_tab[1] == 0)
8327 {
8328 p = options[0].fullname;
8329 for (opt_idx = 1; (s = options[opt_idx].fullname) != NULL; opt_idx++)
8330 {
8331 if (s[0] != p[0])
8332 {
8333 if (s[0] == 't' && s[1] == '_')
8334 quick_tab[26] = opt_idx;
8335 else
8336 quick_tab[CharOrdLow(s[0])] = opt_idx;
8337 }
8338 p = s;
8339 }
8340 }
8341
8342 /*
8343 * Check for name starting with an illegal character.
8344 */
8345 #ifdef EBCDIC
8346 if (!islower(arg[0]))
8347 #else
8348 if (arg[0] < 'a' || arg[0] > 'z')
8349 #endif
8350 return -1;
8351
8352 is_term_opt = (arg[0] == 't' && arg[1] == '_');
8353 if (is_term_opt)
8354 opt_idx = quick_tab[26];
8355 else
8356 opt_idx = quick_tab[CharOrdLow(arg[0])];
8357 for ( ; (s = options[opt_idx].fullname) != NULL; opt_idx++)
8358 {
8359 if (STRCMP(arg, s) == 0) /* match full name */
8360 break;
8361 }
8362 if (s == NULL && !is_term_opt)
8363 {
8364 opt_idx = quick_tab[CharOrdLow(arg[0])];
8365 for ( ; options[opt_idx].fullname != NULL; opt_idx++)
8366 {
8367 s = options[opt_idx].shortname;
8368 if (s != NULL && STRCMP(arg, s) == 0) /* match short name */
8369 break;
8370 s = NULL;
8371 }
8372 }
8373 if (s == NULL)
8374 opt_idx = -1;
8375 return opt_idx;
8376 }
8377
8378 #if defined(FEAT_EVAL) || defined(FEAT_TCL) || defined(FEAT_MZSCHEME)
8379 /*
8380 * Get the value for an option.
8381 *
8382 * Returns:
8383 * Number or Toggle option: 1, *numval gets value.
8384 * String option: 0, *stringval gets allocated string.
8385 * Hidden Number or Toggle option: -1.
8386 * hidden String option: -2.
8387 * unknown option: -3.
8388 */
8389 int
8390 get_option_value(name, numval, stringval, opt_flags)
8391 char_u *name;
8392 long *numval;
8393 char_u **stringval; /* NULL when only checking existance */
8394 int opt_flags;
8395 {
8396 int opt_idx;
8397 char_u *varp;
8398
8399 opt_idx = findoption(name);
8400 if (opt_idx < 0) /* unknown option */
8401 return -3;
8402
8403 varp = get_varp_scope(&(options[opt_idx]), opt_flags);
8404
8405 if (options[opt_idx].flags & P_STRING)
8406 {
8407 if (varp == NULL) /* hidden option */
8408 return -2;
8409 if (stringval != NULL)
8410 {
8411 #ifdef FEAT_CRYPT
8412 /* never return the value of the crypt key */
8413 if ((char_u **)varp == &curbuf->b_p_key
8414 && **(char_u **)(varp) != NUL)
8415 *stringval = vim_strsave((char_u *)"*****");
8416 else
8417 #endif
8418 *stringval = vim_strsave(*(char_u **)(varp));
8419 }
8420 return 0;
8421 }
8422
8423 if (varp == NULL) /* hidden option */
8424 return -1;
8425 if (options[opt_idx].flags & P_NUM)
8426 *numval = *(long *)varp;
8427 else
8428 {
8429 /* Special case: 'modified' is b_changed, but we also want to consider
8430 * it set when 'ff' or 'fenc' changed. */
8431 if ((int *)varp == &curbuf->b_changed)
8432 *numval = curbufIsChanged();
8433 else
8434 *numval = *(int *)varp;
8435 }
8436 return 1;
8437 }
8438 #endif
8439
8440 /*
8441 * Set the value of option "name".
8442 * Use "string" for string options, use "number" for other options.
8443 */
8444 void
8445 set_option_value(name, number, string, opt_flags)
8446 char_u *name;
8447 long number;
8448 char_u *string;
8449 int opt_flags; /* OPT_LOCAL or 0 (both) */
8450 {
8451 int opt_idx;
8452 char_u *varp;
8453 long_u flags;
8454
8455 opt_idx = findoption(name);
8456 if (opt_idx < 0)
8457 EMSG2(_("E355: Unknown option: %s"), name);
8458 else
8459 {
8460 flags = options[opt_idx].flags;
8461 #ifdef HAVE_SANDBOX
8462 /* Disallow changing some options in the sandbox */
8463 if (sandbox > 0 && (flags & P_SECURE))
8464 {
8465 EMSG(_(e_sandbox));
8466 return;
8467 }
8468 #endif
8469 if (flags & P_STRING)
8470 set_string_option(opt_idx, string, opt_flags);
8471 else
8472 {
8473 varp = get_varp_scope(&(options[opt_idx]), opt_flags);
8474 if (varp != NULL) /* hidden option is not changed */
8475 {
8476 if (number == 0 && string != NULL)
8477 {
8478 int idx;
8479
8480 /* Either we are given a string or we are setting option
8481 * to zero. */
8482 for (idx = 0; string[idx] == '0'; ++idx)
8483 ;
8484 if (string[idx] != NUL || idx == 0)
8485 {
8486 /* There's another character after zeros or the string
8487 * is empty. In both cases, we are trying to set a
8488 * num option using a string. */
8489 EMSG3(_("E521: Number required: &%s = '%s'"),
8490 name, string);
8491 return; /* do nothing as we hit an error */
8492
8493 }
8494 }
8495 if (flags & P_NUM)
8496 (void)set_num_option(opt_idx, varp, number,
8497 NULL, 0, opt_flags);
8498 else
8499 (void)set_bool_option(opt_idx, varp, (int)number,
8500 opt_flags);
8501 }
8502 }
8503 }
8504 }
8505
8506 /*
8507 * Get the terminal code for a terminal option.
8508 * Returns NULL when not found.
8509 */
8510 char_u *
8511 get_term_code(tname)
8512 char_u *tname;
8513 {
8514 int opt_idx;
8515 char_u *varp;
8516
8517 if (tname[0] != 't' || tname[1] != '_' ||
8518 tname[2] == NUL || tname[3] == NUL)
8519 return NULL;
8520 if ((opt_idx = findoption(tname)) >= 0)
8521 {
8522 varp = get_varp(&(options[opt_idx]));
8523 if (varp != NULL)
8524 varp = *(char_u **)(varp);
8525 return varp;
8526 }
8527 return find_termcode(tname + 2);
8528 }
8529
8530 char_u *
8531 get_highlight_default()
8532 {
8533 int i;
8534
8535 i = findoption((char_u *)"hl");
8536 if (i >= 0)
8537 return options[i].def_val[VI_DEFAULT];
8538 return (char_u *)NULL;
8539 }
8540
8541 #if defined(FEAT_MBYTE) || defined(PROTO)
8542 char_u *
8543 get_encoding_default()
8544 {
8545 int i;
8546
8547 i = findoption((char_u *)"enc");
8548 if (i >= 0)
8549 return options[i].def_val[VI_DEFAULT];
8550 return (char_u *)NULL;
8551 }
8552 #endif
8553
8554 /*
8555 * Translate a string like "t_xx", "<t_xx>" or "<S-Tab>" to a key number.
8556 */
8557 static int
8558 find_key_option(arg)
8559 char_u *arg;
8560 {
8561 int key;
8562 int modifiers;
8563
8564 /*
8565 * Don't use get_special_key_code() for t_xx, we don't want it to call
8566 * add_termcap_entry().
8567 */
8568 if (arg[0] == 't' && arg[1] == '_' && arg[2] && arg[3])
8569 key = TERMCAP2KEY(arg[2], arg[3]);
8570 else
8571 {
8572 --arg; /* put arg at the '<' */
8573 modifiers = 0;
8574 key = find_special_key(&arg, &modifiers, TRUE, TRUE);
8575 if (modifiers) /* can't handle modifiers here */
8576 key = 0;
8577 }
8578 return key;
8579 }
8580
8581 /*
8582 * if 'all' == 0: show changed options
8583 * if 'all' == 1: show all normal options
8584 * if 'all' == 2: show all terminal options
8585 */
8586 static void
8587 showoptions(all, opt_flags)
8588 int all;
8589 int opt_flags; /* OPT_LOCAL and/or OPT_GLOBAL */
8590 {
8591 struct vimoption *p;
8592 int col;
8593 int isterm;
8594 char_u *varp;
8595 struct vimoption **items;
8596 int item_count;
8597 int run;
8598 int row, rows;
8599 int cols;
8600 int i;
8601 int len;
8602
8603 #define INC 20
8604 #define GAP 3
8605
8606 items = (struct vimoption **)alloc((unsigned)(sizeof(struct vimoption *) *
8607 PARAM_COUNT));
8608 if (items == NULL)
8609 return;
8610
8611 /* Highlight title */
8612 if (all == 2)
8613 MSG_PUTS_TITLE(_("\n--- Terminal codes ---"));
8614 else if (opt_flags & OPT_GLOBAL)
8615 MSG_PUTS_TITLE(_("\n--- Global option values ---"));
8616 else if (opt_flags & OPT_LOCAL)
8617 MSG_PUTS_TITLE(_("\n--- Local option values ---"));
8618 else
8619 MSG_PUTS_TITLE(_("\n--- Options ---"));
8620
8621 /*
8622 * do the loop two times:
8623 * 1. display the short items
8624 * 2. display the long items (only strings and numbers)
8625 */
8626 for (run = 1; run <= 2 && !got_int; ++run)
8627 {
8628 /*
8629 * collect the items in items[]
8630 */
8631 item_count = 0;
8632 for (p = &options[0]; p->fullname != NULL; p++)
8633 {
8634 varp = NULL;
8635 isterm = istermoption(p);
8636 if (opt_flags != 0)
8637 {
8638 if (p->indir != PV_NONE && !isterm)
8639 varp = get_varp_scope(p, opt_flags);
8640 }
8641 else
8642 varp = get_varp(p);
8643 if (varp != NULL
8644 && ((all == 2 && isterm)
8645 || (all == 1 && !isterm)
8646 || (all == 0 && !optval_default(p, varp))))
8647 {
8648 if (p->flags & P_BOOL)
8649 len = 1; /* a toggle option fits always */
8650 else
8651 {
8652 option_value2string(p, opt_flags);
8653 len = (int)STRLEN(p->fullname) + vim_strsize(NameBuff) + 1;
8654 }
8655 if ((len <= INC - GAP && run == 1) ||
8656 (len > INC - GAP && run == 2))
8657 items[item_count++] = p;
8658 }
8659 }
8660
8661 /*
8662 * display the items
8663 */
8664 if (run == 1)
8665 {
8666 cols = (Columns + GAP - 3) / INC;
8667 if (cols == 0)
8668 cols = 1;
8669 rows = (item_count + cols - 1) / cols;
8670 }
8671 else /* run == 2 */
8672 rows = item_count;
8673 for (row = 0; row < rows && !got_int; ++row)
8674 {
8675 msg_putchar('\n'); /* go to next line */
8676 if (got_int) /* 'q' typed in more */
8677 break;
8678 col = 0;
8679 for (i = row; i < item_count; i += rows)
8680 {
8681 msg_col = col; /* make columns */
8682 showoneopt(items[i], opt_flags);
8683 col += INC;
8684 }
8685 out_flush();
8686 ui_breakcheck();
8687 }
8688 }
8689 vim_free(items);
8690 }
8691
8692 /*
8693 * Return TRUE if option "p" has its default value.
8694 */
8695 static int
8696 optval_default(p, varp)
8697 struct vimoption *p;
8698 char_u *varp;
8699 {
8700 int dvi;
8701
8702 if (varp == NULL)
8703 return TRUE; /* hidden option is always at default */
8704 dvi = ((p->flags & P_VI_DEF) || p_cp) ? VI_DEFAULT : VIM_DEFAULT;
8705 if (p->flags & P_NUM)
8706 return (*(long *)varp == (long)(long_i)p->def_val[dvi]);
8707 if (p->flags & P_BOOL)
8708 /* the cast to long is required for Manx C, long_i is
8709 * needed for MSVC */
8710 return (*(int *)varp == (int)(long)(long_i)p->def_val[dvi]);
8711 /* P_STRING */
8712 return (STRCMP(*(char_u **)varp, p->def_val[dvi]) == 0);
8713 }
8714
8715 /*
8716 * showoneopt: show the value of one option
8717 * must not be called with a hidden option!
8718 */
8719 static void
8720 showoneopt(p, opt_flags)
8721 struct vimoption *p;
8722 int opt_flags; /* OPT_LOCAL or OPT_GLOBAL */
8723 {
8724 char_u *varp;
8725 int save_silent = silent_mode;
8726
8727 silent_mode = FALSE;
8728 info_message = TRUE; /* use mch_msg(), not mch_errmsg() */
8729
8730 varp = get_varp_scope(p, opt_flags);
8731
8732 /* for 'modified' we also need to check if 'ff' or 'fenc' changed. */
8733 if ((p->flags & P_BOOL) && ((int *)varp == &curbuf->b_changed
8734 ? !curbufIsChanged() : !*(int *)varp))
8735 MSG_PUTS("no");
8736 else if ((p->flags & P_BOOL) && *(int *)varp < 0)
8737 MSG_PUTS("--");
8738 else
8739 MSG_PUTS(" ");
8740 MSG_PUTS(p->fullname);
8741 if (!(p->flags & P_BOOL))
8742 {
8743 msg_putchar('=');
8744 /* put value string in NameBuff */
8745 option_value2string(p, opt_flags);
8746 msg_outtrans(NameBuff);
8747 }
8748
8749 silent_mode = save_silent;
8750 info_message = FALSE;
8751 }
8752
8753 /*
8754 * Write modified options as ":set" commands to a file.
8755 *
8756 * There are three values for "opt_flags":
8757 * OPT_GLOBAL: Write global option values and fresh values of
8758 * buffer-local options (used for start of a session
8759 * file).
8760 * OPT_GLOBAL + OPT_LOCAL: Idem, add fresh values of window-local options for
8761 * curwin (used for a vimrc file).
8762 * OPT_LOCAL: Write buffer-local option values for curbuf, fresh
8763 * and local values for window-local options of
8764 * curwin. Local values are also written when at the
8765 * default value, because a modeline or autocommand
8766 * may have set them when doing ":edit file" and the
8767 * user has set them back at the default or fresh
8768 * value.
8769 * When "local_only" is TRUE, don't write fresh
8770 * values, only local values (for ":mkview").
8771 * (fresh value = value used for a new buffer or window for a local option).
8772 *
8773 * Return FAIL on error, OK otherwise.
8774 */
8775 int
8776 makeset(fd, opt_flags, local_only)
8777 FILE *fd;
8778 int opt_flags;
8779 int local_only;
8780 {
8781 struct vimoption *p;
8782 char_u *varp; /* currently used value */
8783 char_u *varp_fresh; /* local value */
8784 char_u *varp_local = NULL; /* fresh value */
8785 char *cmd;
8786 int round;
8787 int pri;
8788
8789 /*
8790 * The options that don't have a default (terminal name, columns, lines)
8791 * are never written. Terminal options are also not written.
8792 * Do the loop over "options[]" twice: once for options with the
8793 * P_PRI_MKRC flag and once without.
8794 */
8795 for (pri = 1; pri >= 0; --pri)
8796 {
8797 for (p = &options[0]; !istermoption(p); p++)
8798 if (!(p->flags & P_NO_MKRC)
8799 && !istermoption(p)
8800 && ((pri == 1) == ((p->flags & P_PRI_MKRC) != 0)))
8801 {
8802 /* skip global option when only doing locals */
8803 if (p->indir == PV_NONE && !(opt_flags & OPT_GLOBAL))
8804 continue;
8805
8806 /* Do not store options like 'bufhidden' and 'syntax' in a vimrc
8807 * file, they are always buffer-specific. */
8808 if ((opt_flags & OPT_GLOBAL) && (p->flags & P_NOGLOB))
8809 continue;
8810
8811 /* Global values are only written when not at the default value. */
8812 varp = get_varp_scope(p, opt_flags);
8813 if ((opt_flags & OPT_GLOBAL) && optval_default(p, varp))
8814 continue;
8815
8816 round = 2;
8817 if (p->indir != PV_NONE)
8818 {
8819 if (p->var == VAR_WIN)
8820 {
8821 /* skip window-local option when only doing globals */
8822 if (!(opt_flags & OPT_LOCAL))
8823 continue;
8824 /* When fresh value of window-local option is not at the
8825 * default, need to write it too. */
8826 if (!(opt_flags & OPT_GLOBAL) && !local_only)
8827 {
8828 varp_fresh = get_varp_scope(p, OPT_GLOBAL);
8829 if (!optval_default(p, varp_fresh))
8830 {
8831 round = 1;
8832 varp_local = varp;
8833 varp = varp_fresh;
8834 }
8835 }
8836 }
8837 }
8838
8839 /* Round 1: fresh value for window-local options.
8840 * Round 2: other values */
8841 for ( ; round <= 2; varp = varp_local, ++round)
8842 {
8843 if (round == 1 || (opt_flags & OPT_GLOBAL))
8844 cmd = "set";
8845 else
8846 cmd = "setlocal";
8847
8848 if (p->flags & P_BOOL)
8849 {
8850 if (put_setbool(fd, cmd, p->fullname, *(int *)varp) == FAIL)
8851 return FAIL;
8852 }
8853 else if (p->flags & P_NUM)
8854 {
8855 if (put_setnum(fd, cmd, p->fullname, (long *)varp) == FAIL)
8856 return FAIL;
8857 }
8858 else /* P_STRING */
8859 {
8860 #if defined(FEAT_SYN_HL) || defined(FEAT_AUTOCMD)
8861 int do_endif = FALSE;
8862
8863 /* Don't set 'syntax' and 'filetype' again if the value is
8864 * already right, avoids reloading the syntax file. */
8865 if (
8866 # if defined(FEAT_SYN_HL)
8867 p->indir == PV_SYN
8868 # if defined(FEAT_AUTOCMD)
8869 ||
8870 # endif
8871 # endif
8872 # if defined(FEAT_AUTOCMD)
8873 p->indir == PV_FT
8874 # endif
8875 )
8876 {
8877 if (fprintf(fd, "if &%s != '%s'", p->fullname,
8878 *(char_u **)(varp)) < 0
8879 || put_eol(fd) < 0)
8880 return FAIL;
8881 do_endif = TRUE;
8882 }
8883 #endif
8884 if (put_setstring(fd, cmd, p->fullname, (char_u **)varp,
8885 (p->flags & P_EXPAND) != 0) == FAIL)
8886 return FAIL;
8887 #if defined(FEAT_SYN_HL) || defined(FEAT_AUTOCMD)
8888 if (do_endif)
8889 {
8890 if (put_line(fd, "endif") == FAIL)
8891 return FAIL;
8892 }
8893 #endif
8894 }
8895 }
8896 }
8897 }
8898 return OK;
8899 }
8900
8901 #if defined(FEAT_FOLDING) || defined(PROTO)
8902 /*
8903 * Generate set commands for the local fold options only. Used when
8904 * 'sessionoptions' or 'viewoptions' contains "folds" but not "options".
8905 */
8906 int
8907 makefoldset(fd)
8908 FILE *fd;
8909 {
8910 if (put_setstring(fd, "setlocal", "fdm", &curwin->w_p_fdm, FALSE) == FAIL
8911 # ifdef FEAT_EVAL
8912 || put_setstring(fd, "setlocal", "fde", &curwin->w_p_fde, FALSE)
8913 == FAIL
8914 # endif
8915 || put_setstring(fd, "setlocal", "fmr", &curwin->w_p_fmr, FALSE)
8916 == FAIL
8917 || put_setstring(fd, "setlocal", "fdi", &curwin->w_p_fdi, FALSE)
8918 == FAIL
8919 || put_setnum(fd, "setlocal", "fdl", &curwin->w_p_fdl) == FAIL
8920 || put_setnum(fd, "setlocal", "fml", &curwin->w_p_fml) == FAIL
8921 || put_setnum(fd, "setlocal", "fdn", &curwin->w_p_fdn) == FAIL
8922 || put_setbool(fd, "setlocal", "fen", curwin->w_p_fen) == FAIL
8923 )
8924 return FAIL;
8925
8926 return OK;
8927 }
8928 #endif
8929
8930 static int
8931 put_setstring(fd, cmd, name, valuep, expand)
8932 FILE *fd;
8933 char *cmd;
8934 char *name;
8935 char_u **valuep;
8936 int expand;
8937 {
8938 char_u *s;
8939 char_u buf[MAXPATHL];
8940
8941 if (fprintf(fd, "%s %s=", cmd, name) < 0)
8942 return FAIL;
8943 if (*valuep != NULL)
8944 {
8945 /* Output 'pastetoggle' as key names. For other
8946 * options some characters have to be escaped with
8947 * CTRL-V or backslash */
8948 if (valuep == &p_pt)
8949 {
8950 s = *valuep;
8951 while (*s != NUL)
8952 if (put_escstr(fd, str2special(&s, FALSE), 2) == FAIL)
8953 return FAIL;
8954 }
8955 else if (expand)
8956 {
8957 home_replace(NULL, *valuep, buf, MAXPATHL, FALSE);
8958 if (put_escstr(fd, buf, 2) == FAIL)
8959 return FAIL;
8960 }
8961 else if (put_escstr(fd, *valuep, 2) == FAIL)
8962 return FAIL;
8963 }
8964 if (put_eol(fd) < 0)
8965 return FAIL;
8966 return OK;
8967 }
8968
8969 static int
8970 put_setnum(fd, cmd, name, valuep)
8971 FILE *fd;
8972 char *cmd;
8973 char *name;
8974 long *valuep;
8975 {
8976 long wc;
8977
8978 if (fprintf(fd, "%s %s=", cmd, name) < 0)
8979 return FAIL;
8980 if (wc_use_keyname((char_u *)valuep, &wc))
8981 {
8982 /* print 'wildchar' and 'wildcharm' as a key name */
8983 if (fputs((char *)get_special_key_name((int)wc, 0), fd) < 0)
8984 return FAIL;
8985 }
8986 else if (fprintf(fd, "%ld", *valuep) < 0)
8987 return FAIL;
8988 if (put_eol(fd) < 0)
8989 return FAIL;
8990 return OK;
8991 }
8992
8993 static int
8994 put_setbool(fd, cmd, name, value)
8995 FILE *fd;
8996 char *cmd;
8997 char *name;
8998 int value;
8999 {
9000 if (value < 0) /* global/local option using global value */
9001 return OK;
9002 if (fprintf(fd, "%s %s%s", cmd, value ? "" : "no", name) < 0
9003 || put_eol(fd) < 0)
9004 return FAIL;
9005 return OK;
9006 }
9007
9008 /*
9009 * Clear all the terminal options.
9010 * If the option has been allocated, free the memory.
9011 * Terminal options are never hidden or indirect.
9012 */
9013 void
9014 clear_termoptions()
9015 {
9016 /*
9017 * Reset a few things before clearing the old options. This may cause
9018 * outputting a few things that the terminal doesn't understand, but the
9019 * screen will be cleared later, so this is OK.
9020 */
9021 #ifdef FEAT_MOUSE_TTY
9022 mch_setmouse(FALSE); /* switch mouse off */
9023 #endif
9024 #ifdef FEAT_TITLE
9025 mch_restore_title(3); /* restore window titles */
9026 #endif
9027 #if defined(FEAT_XCLIPBOARD) && defined(FEAT_GUI)
9028 /* When starting the GUI close the display opened for the clipboard.
9029 * After restoring the title, because that will need the display. */
9030 if (gui.starting)
9031 clear_xterm_clip();
9032 #endif
9033 #ifdef WIN3264
9034 /*
9035 * Check if this is allowed now.
9036 */
9037 if (can_end_termcap_mode(FALSE) == TRUE)
9038 #endif
9039 stoptermcap(); /* stop termcap mode */
9040
9041 free_termoptions();
9042 }
9043
9044 void
9045 free_termoptions()
9046 {
9047 struct vimoption *p;
9048
9049 for (p = &options[0]; p->fullname != NULL; p++)
9050 if (istermoption(p))
9051 {
9052 if (p->flags & P_ALLOCED)
9053 free_string_option(*(char_u **)(p->var));
9054 if (p->flags & P_DEF_ALLOCED)
9055 free_string_option(p->def_val[VI_DEFAULT]);
9056 *(char_u **)(p->var) = empty_option;
9057 p->def_val[VI_DEFAULT] = empty_option;
9058 p->flags &= ~(P_ALLOCED|P_DEF_ALLOCED);
9059 }
9060 clear_termcodes();
9061 }
9062
9063 /*
9064 * Set the terminal option defaults to the current value.
9065 * Used after setting the terminal name.
9066 */
9067 void
9068 set_term_defaults()
9069 {
9070 struct vimoption *p;
9071
9072 for (p = &options[0]; p->fullname != NULL; p++)
9073 {
9074 if (istermoption(p) && p->def_val[VI_DEFAULT] != *(char_u **)(p->var))
9075 {
9076 if (p->flags & P_DEF_ALLOCED)
9077 {
9078 free_string_option(p->def_val[VI_DEFAULT]);
9079 p->flags &= ~P_DEF_ALLOCED;
9080 }
9081 p->def_val[VI_DEFAULT] = *(char_u **)(p->var);
9082 if (p->flags & P_ALLOCED)
9083 {
9084 p->flags |= P_DEF_ALLOCED;
9085 p->flags &= ~P_ALLOCED; /* don't free the value now */
9086 }
9087 }
9088 }
9089 }
9090
9091 /*
9092 * return TRUE if 'p' starts with 't_'
9093 */
9094 static int
9095 istermoption(p)
9096 struct vimoption *p;
9097 {
9098 return (p->fullname[0] == 't' && p->fullname[1] == '_');
9099 }
9100
9101 /*
9102 * Compute columns for ruler and shown command. 'sc_col' is also used to
9103 * decide what the maximum length of a message on the status line can be.
9104 * If there is a status line for the last window, 'sc_col' is independent
9105 * of 'ru_col'.
9106 */
9107
9108 #define COL_RULER 17 /* columns needed by standard ruler */
9109
9110 void
9111 comp_col()
9112 {
9113 #if defined(FEAT_CMDL_INFO) && defined(FEAT_WINDOWS)
9114 int last_has_status = (p_ls == 2 || (p_ls == 1 && firstwin != lastwin));
9115
9116 sc_col = 0;
9117 ru_col = 0;
9118 if (p_ru)
9119 {
9120 #ifdef FEAT_STL_OPT
9121 ru_col = (ru_wid ? ru_wid : COL_RULER) + 1;
9122 #else
9123 ru_col = COL_RULER + 1;
9124 #endif
9125 /* no last status line, adjust sc_col */
9126 if (!last_has_status)
9127 sc_col = ru_col;
9128 }
9129 if (p_sc)
9130 {
9131 sc_col += SHOWCMD_COLS;
9132 if (!p_ru || last_has_status) /* no need for separating space */
9133 ++sc_col;
9134 }
9135 sc_col = Columns - sc_col;
9136 ru_col = Columns - ru_col;
9137 if (sc_col <= 0) /* screen too narrow, will become a mess */
9138 sc_col = 1;
9139 if (ru_col <= 0)
9140 ru_col = 1;
9141 #else
9142 sc_col = Columns;
9143 ru_col = Columns;
9144 #endif
9145 }
9146
9147 /*
9148 * Get pointer to option variable, depending on local or global scope.
9149 */
9150 static char_u *
9151 get_varp_scope(p, opt_flags)
9152 struct vimoption *p;
9153 int opt_flags;
9154 {
9155 if ((opt_flags & OPT_GLOBAL) && p->indir != PV_NONE)
9156 {
9157 if (p->var == VAR_WIN)
9158 return (char_u *)GLOBAL_WO(get_varp(p));
9159 return p->var;
9160 }
9161 if ((opt_flags & OPT_LOCAL) && ((int)p->indir & PV_BOTH))
9162 {
9163 switch ((int)p->indir)
9164 {
9165 #ifdef FEAT_QUICKFIX
9166 case PV_EFM: return (char_u *)&(curbuf->b_p_efm);
9167 case PV_GP: return (char_u *)&(curbuf->b_p_gp);
9168 case PV_MP: return (char_u *)&(curbuf->b_p_mp);
9169 #endif
9170 case PV_EP: return (char_u *)&(curbuf->b_p_ep);
9171 case PV_KP: return (char_u *)&(curbuf->b_p_kp);
9172 case PV_PATH: return (char_u *)&(curbuf->b_p_path);
9173 case PV_AR: return (char_u *)&(curbuf->b_p_ar);
9174 case PV_TAGS: return (char_u *)&(curbuf->b_p_tags);
9175 #ifdef FEAT_FIND_ID
9176 case PV_DEF: return (char_u *)&(curbuf->b_p_def);
9177 case PV_INC: return (char_u *)&(curbuf->b_p_inc);
9178 #endif
9179 #ifdef FEAT_INS_EXPAND
9180 case PV_DICT: return (char_u *)&(curbuf->b_p_dict);
9181 case PV_TSR: return (char_u *)&(curbuf->b_p_tsr);
9182 #endif
9183 #if defined(FEAT_BEVAL) && defined(FEAT_EVAL)
9184 case PV_BEXPR: return (char_u *)&(curbuf->b_p_bexpr);
9185 #endif
9186 #ifdef FEAT_STL_OPT
9187 case PV_STL: return (char_u *)&(curwin->w_p_stl);
9188 #endif
9189 }
9190 return NULL; /* "cannot happen" */
9191 }
9192 return get_varp(p);
9193 }
9194
9195 /*
9196 * Get pointer to option variable.
9197 */
9198 static char_u *
9199 get_varp(p)
9200 struct vimoption *p;
9201 {
9202 /* hidden option, always return NULL */
9203 if (p->var == NULL)
9204 return NULL;
9205
9206 switch ((int)p->indir)
9207 {
9208 case PV_NONE: return p->var;
9209
9210 /* global option with local value: use local value if it's been set */
9211 case PV_EP: return *curbuf->b_p_ep != NUL
9212 ? (char_u *)&curbuf->b_p_ep : p->var;
9213 case PV_KP: return *curbuf->b_p_kp != NUL
9214 ? (char_u *)&curbuf->b_p_kp : p->var;
9215 case PV_PATH: return *curbuf->b_p_path != NUL
9216 ? (char_u *)&(curbuf->b_p_path) : p->var;
9217 case PV_AR: return curbuf->b_p_ar >= 0
9218 ? (char_u *)&(curbuf->b_p_ar) : p->var;
9219 case PV_TAGS: return *curbuf->b_p_tags != NUL
9220 ? (char_u *)&(curbuf->b_p_tags) : p->var;
9221 #ifdef FEAT_FIND_ID
9222 case PV_DEF: return *curbuf->b_p_def != NUL
9223 ? (char_u *)&(curbuf->b_p_def) : p->var;
9224 case PV_INC: return *curbuf->b_p_inc != NUL
9225 ? (char_u *)&(curbuf->b_p_inc) : p->var;
9226 #endif
9227 #ifdef FEAT_INS_EXPAND
9228 case PV_DICT: return *curbuf->b_p_dict != NUL
9229 ? (char_u *)&(curbuf->b_p_dict) : p->var;
9230 case PV_TSR: return *curbuf->b_p_tsr != NUL
9231 ? (char_u *)&(curbuf->b_p_tsr) : p->var;
9232 #endif
9233 #ifdef FEAT_QUICKFIX
9234 case PV_EFM: return *curbuf->b_p_efm != NUL
9235 ? (char_u *)&(curbuf->b_p_efm) : p->var;
9236 case PV_GP: return *curbuf->b_p_gp != NUL
9237 ? (char_u *)&(curbuf->b_p_gp) : p->var;
9238 case PV_MP: return *curbuf->b_p_mp != NUL
9239 ? (char_u *)&(curbuf->b_p_mp) : p->var;
9240 #endif
9241 #if defined(FEAT_BEVAL) && defined(FEAT_EVAL)
9242 case PV_BEXPR: return *curbuf->b_p_bexpr != NUL
9243 ? (char_u *)&(curbuf->b_p_bexpr) : p->var;
9244 #endif
9245 #ifdef FEAT_STL_OPT
9246 case PV_STL: return *curwin->w_p_stl != NUL
9247 ? (char_u *)&(curwin->w_p_stl) : p->var;
9248 #endif
9249
9250 #ifdef FEAT_ARABIC
9251 case PV_ARAB: return (char_u *)&(curwin->w_p_arab);
9252 #endif
9253 case PV_LIST: return (char_u *)&(curwin->w_p_list);
9254 #ifdef FEAT_SPELL
9255 case PV_SPELL: return (char_u *)&(curwin->w_p_spell);
9256 #endif
9257 #ifdef FEAT_SYN_HL
9258 case PV_CUC: return (char_u *)&(curwin->w_p_cuc);
9259 case PV_CUL: return (char_u *)&(curwin->w_p_cul);
9260 #endif
9261 #ifdef FEAT_DIFF
9262 case PV_DIFF: return (char_u *)&(curwin->w_p_diff);
9263 #endif
9264 #ifdef FEAT_FOLDING
9265 case PV_FDC: return (char_u *)&(curwin->w_p_fdc);
9266 case PV_FEN: return (char_u *)&(curwin->w_p_fen);
9267 case PV_FDI: return (char_u *)&(curwin->w_p_fdi);
9268 case PV_FDL: return (char_u *)&(curwin->w_p_fdl);
9269 case PV_FDM: return (char_u *)&(curwin->w_p_fdm);
9270 case PV_FML: return (char_u *)&(curwin->w_p_fml);
9271 case PV_FDN: return (char_u *)&(curwin->w_p_fdn);
9272 # ifdef FEAT_EVAL
9273 case PV_FDE: return (char_u *)&(curwin->w_p_fde);
9274 case PV_FDT: return (char_u *)&(curwin->w_p_fdt);
9275 # endif
9276 case PV_FMR: return (char_u *)&(curwin->w_p_fmr);
9277 #endif
9278 case PV_NU: return (char_u *)&(curwin->w_p_nu);
9279 #ifdef FEAT_LINEBREAK
9280 case PV_NUW: return (char_u *)&(curwin->w_p_nuw);
9281 #endif
9282 #ifdef FEAT_WINDOWS
9283 case PV_WFH: return (char_u *)&(curwin->w_p_wfh);
9284 #endif
9285 #ifdef FEAT_VERTSPLIT
9286 case PV_WFW: return (char_u *)&(curwin->w_p_wfw);
9287 #endif
9288 #if defined(FEAT_WINDOWS) && defined(FEAT_QUICKFIX)
9289 case PV_PVW: return (char_u *)&(curwin->w_p_pvw);
9290 #endif
9291 #ifdef FEAT_RIGHTLEFT
9292 case PV_RL: return (char_u *)&(curwin->w_p_rl);
9293 case PV_RLC: return (char_u *)&(curwin->w_p_rlc);
9294 #endif
9295 case PV_SCROLL: return (char_u *)&(curwin->w_p_scr);
9296 case PV_WRAP: return (char_u *)&(curwin->w_p_wrap);
9297 #ifdef FEAT_LINEBREAK
9298 case PV_LBR: return (char_u *)&(curwin->w_p_lbr);
9299 #endif
9300 #ifdef FEAT_SCROLLBIND
9301 case PV_SCBIND: return (char_u *)&(curwin->w_p_scb);
9302 #endif
9303
9304 case PV_AI: return (char_u *)&(curbuf->b_p_ai);
9305 case PV_BIN: return (char_u *)&(curbuf->b_p_bin);
9306 #ifdef FEAT_MBYTE
9307 case PV_BOMB: return (char_u *)&(curbuf->b_p_bomb);
9308 #endif
9309 #if defined(FEAT_QUICKFIX)
9310 case PV_BH: return (char_u *)&(curbuf->b_p_bh);
9311 case PV_BT: return (char_u *)&(curbuf->b_p_bt);
9312 #endif
9313 case PV_BL: return (char_u *)&(curbuf->b_p_bl);
9314 case PV_CI: return (char_u *)&(curbuf->b_p_ci);
9315 #ifdef FEAT_CINDENT
9316 case PV_CIN: return (char_u *)&(curbuf->b_p_cin);
9317 case PV_CINK: return (char_u *)&(curbuf->b_p_cink);
9318 case PV_CINO: return (char_u *)&(curbuf->b_p_cino);
9319 #endif
9320 #if defined(FEAT_SMARTINDENT) || defined(FEAT_CINDENT)
9321 case PV_CINW: return (char_u *)&(curbuf->b_p_cinw);
9322 #endif
9323 #ifdef FEAT_COMMENTS
9324 case PV_COM: return (char_u *)&(curbuf->b_p_com);
9325 #endif
9326 #ifdef FEAT_FOLDING
9327 case PV_CMS: return (char_u *)&(curbuf->b_p_cms);
9328 #endif
9329 #ifdef FEAT_INS_EXPAND
9330 case PV_CPT: return (char_u *)&(curbuf->b_p_cpt);
9331 #endif
9332 #ifdef FEAT_COMPL_FUNC
9333 case PV_CFU: return (char_u *)&(curbuf->b_p_cfu);
9334 case PV_OFU: return (char_u *)&(curbuf->b_p_ofu);
9335 #endif
9336 case PV_EOL: return (char_u *)&(curbuf->b_p_eol);
9337 case PV_ET: return (char_u *)&(curbuf->b_p_et);
9338 #ifdef FEAT_MBYTE
9339 case PV_FENC: return (char_u *)&(curbuf->b_p_fenc);
9340 #endif
9341 case PV_FF: return (char_u *)&(curbuf->b_p_ff);
9342 #ifdef FEAT_AUTOCMD
9343 case PV_FT: return (char_u *)&(curbuf->b_p_ft);
9344 #endif
9345 case PV_FO: return (char_u *)&(curbuf->b_p_fo);
9346 case PV_FLP: return (char_u *)&(curbuf->b_p_flp);
9347 case PV_IMI: return (char_u *)&(curbuf->b_p_iminsert);
9348 case PV_IMS: return (char_u *)&(curbuf->b_p_imsearch);
9349 case PV_INF: return (char_u *)&(curbuf->b_p_inf);
9350 case PV_ISK: return (char_u *)&(curbuf->b_p_isk);
9351 #ifdef FEAT_FIND_ID
9352 # ifdef FEAT_EVAL
9353 case PV_INEX: return (char_u *)&(curbuf->b_p_inex);
9354 # endif
9355 #endif
9356 #if defined(FEAT_CINDENT) && defined(FEAT_EVAL)
9357 case PV_INDE: return (char_u *)&(curbuf->b_p_inde);
9358 case PV_INDK: return (char_u *)&(curbuf->b_p_indk);
9359 #endif
9360 #ifdef FEAT_EVAL
9361 case PV_FEX: return (char_u *)&(curbuf->b_p_fex);
9362 #endif
9363 #ifdef FEAT_CRYPT
9364 case PV_KEY: return (char_u *)&(curbuf->b_p_key);
9365 #endif
9366 #ifdef FEAT_LISP
9367 case PV_LISP: return (char_u *)&(curbuf->b_p_lisp);
9368 #endif
9369 case PV_ML: return (char_u *)&(curbuf->b_p_ml);
9370 case PV_MPS: return (char_u *)&(curbuf->b_p_mps);
9371 #ifdef FEAT_GUI_MACVIM
9372 case PV_MMTA: return (char_u *)&(curbuf->b_p_mmta);
9373 #endif
9374 case PV_MA: return (char_u *)&(curbuf->b_p_ma);
9375 case PV_MOD: return (char_u *)&(curbuf->b_changed);
9376 case PV_NF: return (char_u *)&(curbuf->b_p_nf);
9377 #ifdef FEAT_OSFILETYPE
9378 case PV_OFT: return (char_u *)&(curbuf->b_p_oft);
9379 #endif
9380 case PV_PI: return (char_u *)&(curbuf->b_p_pi);
9381 #ifdef FEAT_TEXTOBJ
9382 case PV_QE: return (char_u *)&(curbuf->b_p_qe);
9383 #endif
9384 case PV_RO: return (char_u *)&(curbuf->b_p_ro);
9385 #ifdef FEAT_SMARTINDENT
9386 case PV_SI: return (char_u *)&(curbuf->b_p_si);
9387 #endif
9388 #ifndef SHORT_FNAME
9389 case PV_SN: return (char_u *)&(curbuf->b_p_sn);
9390 #endif
9391 case PV_STS: return (char_u *)&(curbuf->b_p_sts);
9392 #ifdef FEAT_SEARCHPATH
9393 case PV_SUA: return (char_u *)&(curbuf->b_p_sua);
9394 #endif
9395 case PV_SWF: return (char_u *)&(curbuf->b_p_swf);
9396 #ifdef FEAT_SYN_HL
9397 case PV_SMC: return (char_u *)&(curbuf->b_p_smc);
9398 case PV_SYN: return (char_u *)&(curbuf->b_p_syn);
9399 #endif
9400 #ifdef FEAT_SPELL
9401 case PV_SPC: return (char_u *)&(curbuf->b_p_spc);
9402 case PV_SPF: return (char_u *)&(curbuf->b_p_spf);
9403 case PV_SPL: return (char_u *)&(curbuf->b_p_spl);
9404 #endif
9405 case PV_SW: return (char_u *)&(curbuf->b_p_sw);
9406 case PV_TS: return (char_u *)&(curbuf->b_p_ts);
9407 case PV_TW: return (char_u *)&(curbuf->b_p_tw);
9408 case PV_TX: return (char_u *)&(curbuf->b_p_tx);
9409 case PV_WM: return (char_u *)&(curbuf->b_p_wm);
9410 #ifdef FEAT_KEYMAP
9411 case PV_KMAP: return (char_u *)&(curbuf->b_p_keymap);
9412 #endif
9413 default: EMSG(_("E356: get_varp ERROR"));
9414 }
9415 /* always return a valid pointer to avoid a crash! */
9416 return (char_u *)&(curbuf->b_p_wm);
9417 }
9418
9419 /*
9420 * Get the value of 'equalprg', either the buffer-local one or the global one.
9421 */
9422 char_u *
9423 get_equalprg()
9424 {
9425 if (*curbuf->b_p_ep == NUL)
9426 return p_ep;
9427 return curbuf->b_p_ep;
9428 }
9429
9430 #if defined(FEAT_WINDOWS) || defined(PROTO)
9431 /*
9432 * Copy options from one window to another.
9433 * Used when splitting a window.
9434 */
9435 void
9436 win_copy_options(wp_from, wp_to)
9437 win_T *wp_from;
9438 win_T *wp_to;
9439 {
9440 copy_winopt(&wp_from->w_onebuf_opt, &wp_to->w_onebuf_opt);
9441 copy_winopt(&wp_from->w_allbuf_opt, &wp_to->w_allbuf_opt);
9442 # ifdef FEAT_RIGHTLEFT
9443 # ifdef FEAT_FKMAP
9444 /* Is this right? */
9445 wp_to->w_farsi = wp_from->w_farsi;
9446 # endif
9447 # endif
9448 }
9449 #endif
9450
9451 /*
9452 * Copy the options from one winopt_T to another.
9453 * Doesn't free the old option values in "to", use clear_winopt() for that.
9454 * The 'scroll' option is not copied, because it depends on the window height.
9455 * The 'previewwindow' option is reset, there can be only one preview window.
9456 */
9457 void
9458 copy_winopt(from, to)
9459 winopt_T *from;
9460 winopt_T *to;
9461 {
9462 #ifdef FEAT_ARABIC
9463 to->wo_arab = from->wo_arab;
9464 #endif
9465 to->wo_list = from->wo_list;
9466 to->wo_nu = from->wo_nu;
9467 #ifdef FEAT_LINEBREAK
9468 to->wo_nuw = from->wo_nuw;
9469 #endif
9470 #ifdef FEAT_RIGHTLEFT
9471 to->wo_rl = from->wo_rl;
9472 to->wo_rlc = vim_strsave(from->wo_rlc);
9473 #endif
9474 #ifdef FEAT_STL_OPT
9475 to->wo_stl = vim_strsave(from->wo_stl);
9476 #endif
9477 to->wo_wrap = from->wo_wrap;
9478 #ifdef FEAT_LINEBREAK
9479 to->wo_lbr = from->wo_lbr;
9480 #endif
9481 #ifdef FEAT_SCROLLBIND
9482 to->wo_scb = from->wo_scb;
9483 #endif
9484 #ifdef FEAT_SPELL
9485 to->wo_spell = from->wo_spell;
9486 #endif
9487 #ifdef FEAT_SYN_HL
9488 to->wo_cuc = from->wo_cuc;
9489 to->wo_cul = from->wo_cul;
9490 #endif
9491 #ifdef FEAT_DIFF
9492 to->wo_diff = from->wo_diff;
9493 #endif
9494 #ifdef FEAT_FOLDING
9495 to->wo_fdc = from->wo_fdc;
9496 to->wo_fen = from->wo_fen;
9497 to->wo_fdi = vim_strsave(from->wo_fdi);
9498 to->wo_fml = from->wo_fml;
9499 to->wo_fdl = from->wo_fdl;
9500 to->wo_fdm = vim_strsave(from->wo_fdm);
9501 to->wo_fdn = from->wo_fdn;
9502 # ifdef FEAT_EVAL
9503 to->wo_fde = vim_strsave(from->wo_fde);
9504 to->wo_fdt = vim_strsave(from->wo_fdt);
9505 # endif
9506 to->wo_fmr = vim_strsave(from->wo_fmr);
9507 #endif
9508 check_winopt(to); /* don't want NULL pointers */
9509 }
9510
9511 /*
9512 * Check string options in a window for a NULL value.
9513 */
9514 void
9515 check_win_options(win)
9516 win_T *win;
9517 {
9518 check_winopt(&win->w_onebuf_opt);
9519 check_winopt(&win->w_allbuf_opt);
9520 }
9521
9522 /*
9523 * Check for NULL pointers in a winopt_T and replace them with empty_option.
9524 */
9525 void
9526 check_winopt(wop)
9527 winopt_T *wop UNUSED;
9528 {
9529 #ifdef FEAT_FOLDING
9530 check_string_option(&wop->wo_fdi);
9531 check_string_option(&wop->wo_fdm);
9532 # ifdef FEAT_EVAL
9533 check_string_option(&wop->wo_fde);
9534 check_string_option(&wop->wo_fdt);
9535 # endif
9536 check_string_option(&wop->wo_fmr);
9537 #endif
9538 #ifdef FEAT_RIGHTLEFT
9539 check_string_option(&wop->wo_rlc);
9540 #endif
9541 #ifdef FEAT_STL_OPT
9542 check_string_option(&wop->wo_stl);
9543 #endif
9544 }
9545
9546 /*
9547 * Free the allocated memory inside a winopt_T.
9548 */
9549 void
9550 clear_winopt(wop)
9551 winopt_T *wop UNUSED;
9552 {
9553 #ifdef FEAT_FOLDING
9554 clear_string_option(&wop->wo_fdi);
9555 clear_string_option(&wop->wo_fdm);
9556 # ifdef FEAT_EVAL
9557 clear_string_option(&wop->wo_fde);
9558 clear_string_option(&wop->wo_fdt);
9559 # endif
9560 clear_string_option(&wop->wo_fmr);
9561 #endif
9562 #ifdef FEAT_RIGHTLEFT
9563 clear_string_option(&wop->wo_rlc);
9564 #endif
9565 #ifdef FEAT_STL_OPT
9566 clear_string_option(&wop->wo_stl);
9567 #endif
9568 }
9569
9570 /*
9571 * Copy global option values to local options for one buffer.
9572 * Used when creating a new buffer and sometimes when entering a buffer.
9573 * flags:
9574 * BCO_ENTER We will enter the buf buffer.
9575 * BCO_ALWAYS Always copy the options, but only set b_p_initialized when
9576 * appropriate.
9577 * BCO_NOHELP Don't copy the values to a help buffer.
9578 */
9579 void
9580 buf_copy_options(buf, flags)
9581 buf_T *buf;
9582 int flags;
9583 {
9584 int should_copy = TRUE;
9585 char_u *save_p_isk = NULL; /* init for GCC */
9586 int dont_do_help;
9587 int did_isk = FALSE;
9588
9589 /*
9590 * Don't do anything of the buffer is invalid.
9591 */
9592 if (buf == NULL || !buf_valid(buf))
9593 return;
9594
9595 /*
9596 * Skip this when the option defaults have not been set yet. Happens when
9597 * main() allocates the first buffer.
9598 */
9599 if (p_cpo != NULL)
9600 {
9601 /*
9602 * Always copy when entering and 'cpo' contains 'S'.
9603 * Don't copy when already initialized.
9604 * Don't copy when 'cpo' contains 's' and not entering.
9605 * 'S' BCO_ENTER initialized 's' should_copy
9606 * yes yes X X TRUE
9607 * yes no yes X FALSE
9608 * no X yes X FALSE
9609 * X no no yes FALSE
9610 * X no no no TRUE
9611 * no yes no X TRUE
9612 */
9613 if ((vim_strchr(p_cpo, CPO_BUFOPTGLOB) == NULL || !(flags & BCO_ENTER))
9614 && (buf->b_p_initialized
9615 || (!(flags & BCO_ENTER)
9616 && vim_strchr(p_cpo, CPO_BUFOPT) != NULL)))
9617 should_copy = FALSE;
9618
9619 if (should_copy || (flags & BCO_ALWAYS))
9620 {
9621 /* Don't copy the options specific to a help buffer when
9622 * BCO_NOHELP is given or the options were initialized already
9623 * (jumping back to a help file with CTRL-T or CTRL-O) */
9624 dont_do_help = ((flags & BCO_NOHELP) && buf->b_help)
9625 || buf->b_p_initialized;
9626 if (dont_do_help) /* don't free b_p_isk */
9627 {
9628 save_p_isk = buf->b_p_isk;
9629 buf->b_p_isk = NULL;
9630 }
9631 /*
9632 * Always free the allocated strings.
9633 * If not already initialized, set 'readonly' and copy 'fileformat'.
9634 */
9635 if (!buf->b_p_initialized)
9636 {
9637 free_buf_options(buf, TRUE);
9638 buf->b_p_ro = FALSE; /* don't copy readonly */
9639 buf->b_p_tx = p_tx;
9640 #ifdef FEAT_MBYTE
9641 buf->b_p_fenc = vim_strsave(p_fenc);
9642 #endif
9643 buf->b_p_ff = vim_strsave(p_ff);
9644 #if defined(FEAT_QUICKFIX)
9645 buf->b_p_bh = empty_option;
9646 buf->b_p_bt = empty_option;
9647 #endif
9648 }
9649 else
9650 free_buf_options(buf, FALSE);
9651
9652 buf->b_p_ai = p_ai;
9653 buf->b_p_ai_nopaste = p_ai_nopaste;
9654 buf->b_p_sw = p_sw;
9655 buf->b_p_tw = p_tw;
9656 buf->b_p_tw_nopaste = p_tw_nopaste;
9657 buf->b_p_tw_nobin = p_tw_nobin;
9658 buf->b_p_wm = p_wm;
9659 buf->b_p_wm_nopaste = p_wm_nopaste;
9660 buf->b_p_wm_nobin = p_wm_nobin;
9661 buf->b_p_bin = p_bin;
9662 #ifdef FEAT_MBYTE
9663 buf->b_p_bomb = p_bomb;
9664 #endif
9665 buf->b_p_et = p_et;
9666 buf->b_p_et_nobin = p_et_nobin;
9667 buf->b_p_ml = p_ml;
9668 buf->b_p_ml_nobin = p_ml_nobin;
9669 buf->b_p_inf = p_inf;
9670 buf->b_p_swf = p_swf;
9671 #ifdef FEAT_INS_EXPAND
9672 buf->b_p_cpt = vim_strsave(p_cpt);
9673 #endif
9674 #ifdef FEAT_COMPL_FUNC
9675 buf->b_p_cfu = vim_strsave(p_cfu);
9676 buf->b_p_ofu = vim_strsave(p_ofu);
9677 #endif
9678 buf->b_p_sts = p_sts;
9679 buf->b_p_sts_nopaste = p_sts_nopaste;
9680 #ifndef SHORT_FNAME
9681 buf->b_p_sn = p_sn;
9682 #endif
9683 #ifdef FEAT_COMMENTS
9684 buf->b_p_com = vim_strsave(p_com);
9685 #endif
9686 #ifdef FEAT_FOLDING
9687 buf->b_p_cms = vim_strsave(p_cms);
9688 #endif
9689 buf->b_p_fo = vim_strsave(p_fo);
9690 buf->b_p_flp = vim_strsave(p_flp);
9691 buf->b_p_nf = vim_strsave(p_nf);
9692 buf->b_p_mps = vim_strsave(p_mps);
9693 #ifdef FEAT_SMARTINDENT
9694 buf->b_p_si = p_si;
9695 #endif
9696 buf->b_p_ci = p_ci;
9697 #ifdef FEAT_CINDENT
9698 buf->b_p_cin = p_cin;
9699 buf->b_p_cink = vim_strsave(p_cink);
9700 buf->b_p_cino = vim_strsave(p_cino);
9701 #endif
9702 #ifdef FEAT_AUTOCMD
9703 /* Don't copy 'filetype', it must be detected */
9704 buf->b_p_ft = empty_option;
9705 #endif
9706 #ifdef FEAT_OSFILETYPE
9707 buf->b_p_oft = vim_strsave(p_oft);
9708 #endif
9709 buf->b_p_pi = p_pi;
9710 #if defined(FEAT_SMARTINDENT) || defined(FEAT_CINDENT)
9711 buf->b_p_cinw = vim_strsave(p_cinw);
9712 #endif
9713 #ifdef FEAT_LISP
9714 buf->b_p_lisp = p_lisp;
9715 #endif
9716 #ifdef FEAT_SYN_HL
9717 /* Don't copy 'syntax', it must be set */
9718 buf->b_p_syn = empty_option;
9719 buf->b_p_smc = p_smc;
9720 #endif
9721 #ifdef FEAT_SPELL
9722 buf->b_p_spc = vim_strsave(p_spc);
9723 (void)compile_cap_prog(buf);
9724 buf->b_p_spf = vim_strsave(p_spf);
9725 buf->b_p_spl = vim_strsave(p_spl);
9726 #endif
9727 #if defined(FEAT_CINDENT) && defined(FEAT_EVAL)
9728 buf->b_p_inde = vim_strsave(p_inde);
9729 buf->b_p_indk = vim_strsave(p_indk);
9730 #endif
9731 #if defined(FEAT_EVAL)
9732 buf->b_p_fex = vim_strsave(p_fex);
9733 #endif
9734 #ifdef FEAT_CRYPT
9735 buf->b_p_key = vim_strsave(p_key);
9736 #endif
9737 #ifdef FEAT_SEARCHPATH
9738 buf->b_p_sua = vim_strsave(p_sua);
9739 #endif
9740 #ifdef FEAT_KEYMAP
9741 buf->b_p_keymap = vim_strsave(p_keymap);
9742 buf->b_kmap_state |= KEYMAP_INIT;
9743 #endif
9744 #ifdef FEAT_GUI_MACVIM
9745 buf->b_p_mmta = p_mmta;
9746 #endif
9747 /* This isn't really an option, but copying the langmap and IME
9748 * state from the current buffer is better than resetting it. */
9749 buf->b_p_iminsert = p_iminsert;
9750 buf->b_p_imsearch = p_imsearch;
9751
9752 /* options that are normally global but also have a local value
9753 * are not copied, start using the global value */
9754 buf->b_p_ar = -1;
9755 #ifdef FEAT_QUICKFIX
9756 buf->b_p_gp = empty_option;
9757 buf->b_p_mp = empty_option;
9758 buf->b_p_efm = empty_option;
9759 #endif
9760 buf->b_p_ep = empty_option;
9761 buf->b_p_kp = empty_option;
9762 buf->b_p_path = empty_option;
9763 buf->b_p_tags = empty_option;
9764 #ifdef FEAT_FIND_ID
9765 buf->b_p_def = empty_option;
9766 buf->b_p_inc = empty_option;
9767 # ifdef FEAT_EVAL
9768 buf->b_p_inex = vim_strsave(p_inex);
9769 # endif
9770 #endif
9771 #ifdef FEAT_INS_EXPAND
9772 buf->b_p_dict = empty_option;
9773 buf->b_p_tsr = empty_option;
9774 #endif
9775 #ifdef FEAT_TEXTOBJ
9776 buf->b_p_qe = vim_strsave(p_qe);
9777 #endif
9778 #if defined(FEAT_BEVAL) && defined(FEAT_EVAL)
9779 buf->b_p_bexpr = empty_option;
9780 #endif
9781
9782 /*
9783 * Don't copy the options set by ex_help(), use the saved values,
9784 * when going from a help buffer to a non-help buffer.
9785 * Don't touch these at all when BCO_NOHELP is used and going from
9786 * or to a help buffer.
9787 */
9788 if (dont_do_help)
9789 buf->b_p_isk = save_p_isk;
9790 else
9791 {
9792 buf->b_p_isk = vim_strsave(p_isk);
9793 did_isk = TRUE;
9794 buf->b_p_ts = p_ts;
9795 buf->b_help = FALSE;
9796 #ifdef FEAT_QUICKFIX
9797 if (buf->b_p_bt[0] == 'h')
9798 clear_string_option(&buf->b_p_bt);
9799 #endif
9800 buf->b_p_ma = p_ma;
9801 }
9802 }
9803
9804 /*
9805 * When the options should be copied (ignoring BCO_ALWAYS), set the
9806 * flag that indicates that the options have been initialized.
9807 */
9808 if (should_copy)
9809 buf->b_p_initialized = TRUE;
9810 }
9811
9812 check_buf_options(buf); /* make sure we don't have NULLs */
9813 if (did_isk)
9814 (void)buf_init_chartab(buf, FALSE);
9815 }
9816
9817 /*
9818 * Reset the 'modifiable' option and its default value.
9819 */
9820 void
9821 reset_modifiable()
9822 {
9823 int opt_idx;
9824
9825 curbuf->b_p_ma = FALSE;
9826 p_ma = FALSE;
9827 opt_idx = findoption((char_u *)"ma");
9828 if (opt_idx >= 0)
9829 options[opt_idx].def_val[VI_DEFAULT] = FALSE;
9830 }
9831
9832 /*
9833 * Set the global value for 'iminsert' to the local value.
9834 */
9835 void
9836 set_iminsert_global()
9837 {
9838 p_iminsert = curbuf->b_p_iminsert;
9839 }
9840
9841 /*
9842 * Set the global value for 'imsearch' to the local value.
9843 */
9844 void
9845 set_imsearch_global()
9846 {
9847 p_imsearch = curbuf->b_p_imsearch;
9848 }
9849
9850 #if defined(FEAT_CMDL_COMPL) || defined(PROTO)
9851 static int expand_option_idx = -1;
9852 static char_u expand_option_name[5] = {'t', '_', NUL, NUL, NUL};
9853 static int expand_option_flags = 0;
9854
9855 void
9856 set_context_in_set_cmd(xp, arg, opt_flags)
9857 expand_T *xp;
9858 char_u *arg;
9859 int opt_flags; /* OPT_GLOBAL and/or OPT_LOCAL */
9860 {
9861 int nextchar;
9862 long_u flags = 0; /* init for GCC */
9863 int opt_idx = 0; /* init for GCC */
9864 char_u *p;
9865 char_u *s;
9866 int is_term_option = FALSE;
9867 int key;
9868
9869 expand_option_flags = opt_flags;
9870
9871 xp->xp_context = EXPAND_SETTINGS;
9872 if (*arg == NUL)
9873 {
9874 xp->xp_pattern = arg;
9875 return;
9876 }
9877 p = arg + STRLEN(arg) - 1;
9878 if (*p == ' ' && *(p - 1) != '\\')
9879 {
9880 xp->xp_pattern = p + 1;
9881 return;
9882 }
9883 while (p > arg)
9884 {
9885 s = p;
9886 /* count number of backslashes before ' ' or ',' */
9887 if (*p == ' ' || *p == ',')
9888 {
9889 while (s > arg && *(s - 1) == '\\')
9890 --s;
9891 }
9892 /* break at a space with an even number of backslashes */
9893 if (*p == ' ' && ((p - s) & 1) == 0)
9894 {
9895 ++p;
9896 break;
9897 }
9898 --p;
9899 }
9900 if (STRNCMP(p, "no", 2) == 0 && STRNCMP(p, "novice", 6) != 0)
9901 {
9902 xp->xp_context = EXPAND_BOOL_SETTINGS;
9903 p += 2;
9904 }
9905 if (STRNCMP(p, "inv", 3) == 0)
9906 {
9907 xp->xp_context = EXPAND_BOOL_SETTINGS;
9908 p += 3;
9909 }
9910 xp->xp_pattern = arg = p;
9911 if (*arg == '<')
9912 {
9913 while (*p != '>')
9914 if (*p++ == NUL) /* expand terminal option name */
9915 return;
9916 key = get_special_key_code(arg + 1);
9917 if (key == 0) /* unknown name */
9918 {
9919 xp->xp_context = EXPAND_NOTHING;
9920 return;
9921 }
9922 nextchar = *++p;
9923 is_term_option = TRUE;
9924 expand_option_name[2] = KEY2TERMCAP0(key);
9925 expand_option_name[3] = KEY2TERMCAP1(key);
9926 }
9927 else
9928 {
9929 if (p[0] == 't' && p[1] == '_')
9930 {
9931 p += 2;
9932 if (*p != NUL)
9933 ++p;
9934 if (*p == NUL)
9935 return; /* expand option name */
9936 nextchar = *++p;
9937 is_term_option = TRUE;
9938 expand_option_name[2] = p[-2];
9939 expand_option_name[3] = p[-1];
9940 }
9941 else
9942 {
9943 /* Allow * wildcard */
9944 while (ASCII_ISALNUM(*p) || *p == '_' || *p == '*')
9945 p++;
9946 if (*p == NUL)
9947 return;
9948 nextchar = *p;
9949 *p = NUL;
9950 opt_idx = findoption(arg);
9951 *p = nextchar;
9952 if (opt_idx == -1 || options[opt_idx].var == NULL)
9953 {
9954 xp->xp_context = EXPAND_NOTHING;
9955 return;
9956 }
9957 flags = options[opt_idx].flags;
9958 if (flags & P_BOOL)
9959 {
9960 xp->xp_context = EXPAND_NOTHING;
9961 return;
9962 }
9963 }
9964 }
9965 /* handle "-=" and "+=" */
9966 if ((nextchar == '-' || nextchar == '+' || nextchar == '^') && p[1] == '=')
9967 {
9968 ++p;
9969 nextchar = '=';
9970 }
9971 if ((nextchar != '=' && nextchar != ':')
9972 || xp->xp_context == EXPAND_BOOL_SETTINGS)
9973 {
9974 xp->xp_context = EXPAND_UNSUCCESSFUL;
9975 return;
9976 }
9977 if (xp->xp_context != EXPAND_BOOL_SETTINGS && p[1] == NUL)
9978 {
9979 xp->xp_context = EXPAND_OLD_SETTING;
9980 if (is_term_option)
9981 expand_option_idx = -1;
9982 else
9983 expand_option_idx = opt_idx;
9984 xp->xp_pattern = p + 1;
9985 return;
9986 }
9987 xp->xp_context = EXPAND_NOTHING;
9988 if (is_term_option || (flags & P_NUM))
9989 return;
9990
9991 xp->xp_pattern = p + 1;
9992
9993 if (flags & P_EXPAND)
9994 {
9995 p = options[opt_idx].var;
9996 if (p == (char_u *)&p_bdir
9997 || p == (char_u *)&p_dir
9998 || p == (char_u *)&p_path
9999 || p == (char_u *)&p_rtp
10000 #ifdef FEAT_SEARCHPATH
10001 || p == (char_u *)&p_cdpath
10002 #endif
10003 #ifdef FEAT_SESSION
10004 || p == (char_u *)&p_vdir
10005 #endif
10006 )
10007 {
10008 xp->xp_context = EXPAND_DIRECTORIES;
10009 if (p == (char_u *)&p_path
10010 #ifdef FEAT_SEARCHPATH
10011 || p == (char_u *)&p_cdpath
10012 #endif
10013 )
10014 xp->xp_backslash = XP_BS_THREE;
10015 else
10016 xp->xp_backslash = XP_BS_ONE;
10017 }
10018 else
10019 {
10020 xp->xp_context = EXPAND_FILES;
10021 /* for 'tags' need three backslashes for a space */
10022 if (p == (char_u *)&p_tags)
10023 xp->xp_backslash = XP_BS_THREE;
10024 else
10025 xp->xp_backslash = XP_BS_ONE;
10026 }
10027 }
10028
10029 /* For an option that is a list of file names, find the start of the
10030 * last file name. */
10031 for (p = arg + STRLEN(arg) - 1; p > xp->xp_pattern; --p)
10032 {
10033 /* count number of backslashes before ' ' or ',' */
10034 if (*p == ' ' || *p == ',')
10035 {
10036 s = p;
10037 while (s > xp->xp_pattern && *(s - 1) == '\\')
10038 --s;
10039 if ((*p == ' ' && (xp->xp_backslash == XP_BS_THREE && (p - s) < 3))
10040 || (*p == ',' && (flags & P_COMMA) && ((p - s) & 1) == 0))
10041 {
10042 xp->xp_pattern = p + 1;
10043 break;
10044 }
10045 }
10046
10047 #ifdef FEAT_SPELL
10048 /* for 'spellsuggest' start at "file:" */
10049 if (options[opt_idx].var == (char_u *)&p_sps
10050 && STRNCMP(p, "file:", 5) == 0)
10051 {
10052 xp->xp_pattern = p + 5;
10053 break;
10054 }
10055 #endif
10056 }
10057
10058 return;
10059 }
10060
10061 int
10062 ExpandSettings(xp, regmatch, num_file, file)
10063 expand_T *xp;
10064 regmatch_T *regmatch;
10065 int *num_file;
10066 char_u ***file;
10067 {
10068 int num_normal = 0; /* Nr of matching non-term-code settings */
10069 int num_term = 0; /* Nr of matching terminal code settings */
10070 int opt_idx;
10071 int match;
10072 int count = 0;
10073 char_u *str;
10074 int loop;
10075 int is_term_opt;
10076 char_u name_buf[MAX_KEY_NAME_LEN];
10077 static char *(names[]) = {"all", "termcap"};
10078 int ic = regmatch->rm_ic; /* remember the ignore-case flag */
10079
10080 /* do this loop twice:
10081 * loop == 0: count the number of matching options
10082 * loop == 1: copy the matching options into allocated memory
10083 */
10084 for (loop = 0; loop <= 1; ++loop)
10085 {
10086 regmatch->rm_ic = ic;
10087 if (xp->xp_context != EXPAND_BOOL_SETTINGS)
10088 {
10089 for (match = 0; match < (int)(sizeof(names) / sizeof(char *));
10090 ++match)
10091 if (vim_regexec(regmatch, (char_u *)names[match], (colnr_T)0))
10092 {
10093 if (loop == 0)
10094 num_normal++;
10095 else
10096 (*file)[count++] = vim_strsave((char_u *)names[match]);
10097 }
10098 }
10099 for (opt_idx = 0; (str = (char_u *)options[opt_idx].fullname) != NULL;
10100 opt_idx++)
10101 {
10102 if (options[opt_idx].var == NULL)
10103 continue;
10104 if (xp->xp_context == EXPAND_BOOL_SETTINGS
10105 && !(options[opt_idx].flags & P_BOOL))
10106 continue;
10107 is_term_opt = istermoption(&options[opt_idx]);
10108 if (is_term_opt && num_normal > 0)
10109 continue;
10110 match = FALSE;
10111 if (vim_regexec(regmatch, str, (colnr_T)0)
10112 || (options[opt_idx].shortname != NULL
10113 && vim_regexec(regmatch,
10114 (char_u *)options[opt_idx].shortname, (colnr_T)0)))
10115 match = TRUE;
10116 else if (is_term_opt)
10117 {
10118 name_buf[0] = '<';
10119 name_buf[1] = 't';
10120 name_buf[2] = '_';
10121 name_buf[3] = str[2];
10122 name_buf[4] = str[3];
10123 name_buf[5] = '>';
10124 name_buf[6] = NUL;
10125 if (vim_regexec(regmatch, name_buf, (colnr_T)0))
10126 {
10127 match = TRUE;
10128 str = name_buf;
10129 }
10130 }
10131 if (match)
10132 {
10133 if (loop == 0)
10134 {
10135 if (is_term_opt)
10136 num_term++;
10137 else
10138 num_normal++;
10139 }
10140 else
10141 (*file)[count++] = vim_strsave(str);
10142 }
10143 }
10144 /*
10145 * Check terminal key codes, these are not in the option table
10146 */
10147 if (xp->xp_context != EXPAND_BOOL_SETTINGS && num_normal == 0)
10148 {
10149 for (opt_idx = 0; (str = get_termcode(opt_idx)) != NULL; opt_idx++)
10150 {
10151 if (!isprint(str[0]) || !isprint(str[1]))
10152 continue;
10153
10154 name_buf[0] = 't';
10155 name_buf[1] = '_';
10156 name_buf[2] = str[0];
10157 name_buf[3] = str[1];
10158 name_buf[4] = NUL;
10159
10160 match = FALSE;
10161 if (vim_regexec(regmatch, name_buf, (colnr_T)0))
10162 match = TRUE;
10163 else
10164 {
10165 name_buf[0] = '<';
10166 name_buf[1] = 't';
10167 name_buf[2] = '_';
10168 name_buf[3] = str[0];
10169 name_buf[4] = str[1];
10170 name_buf[5] = '>';
10171 name_buf[6] = NUL;
10172
10173 if (vim_regexec(regmatch, name_buf, (colnr_T)0))
10174 match = TRUE;
10175 }
10176 if (match)
10177 {
10178 if (loop == 0)
10179 num_term++;
10180 else
10181 (*file)[count++] = vim_strsave(name_buf);
10182 }
10183 }
10184
10185 /*
10186 * Check special key names.
10187 */
10188 regmatch->rm_ic = TRUE; /* ignore case here */
10189 for (opt_idx = 0; (str = get_key_name(opt_idx)) != NULL; opt_idx++)
10190 {
10191 name_buf[0] = '<';
10192 STRCPY(name_buf + 1, str);
10193 STRCAT(name_buf, ">");
10194
10195 if (vim_regexec(regmatch, name_buf, (colnr_T)0))
10196 {
10197 if (loop == 0)
10198 num_term++;
10199 else
10200 (*file)[count++] = vim_strsave(name_buf);
10201 }
10202 }
10203 }
10204 if (loop == 0)
10205 {
10206 if (num_normal > 0)
10207 *num_file = num_normal;
10208 else if (num_term > 0)
10209 *num_file = num_term;
10210 else
10211 return OK;
10212 *file = (char_u **)alloc((unsigned)(*num_file * sizeof(char_u *)));
10213 if (*file == NULL)
10214 {
10215 *file = (char_u **)"";
10216 return FAIL;
10217 }
10218 }
10219 }
10220 return OK;
10221 }
10222
10223 int
10224 ExpandOldSetting(num_file, file)
10225 int *num_file;
10226 char_u ***file;
10227 {
10228 char_u *var = NULL; /* init for GCC */
10229 char_u *buf;
10230
10231 *num_file = 0;
10232 *file = (char_u **)alloc((unsigned)sizeof(char_u *));
10233 if (*file == NULL)
10234 return FAIL;
10235
10236 /*
10237 * For a terminal key code expand_option_idx is < 0.
10238 */
10239 if (expand_option_idx < 0)
10240 {
10241 var = find_termcode(expand_option_name + 2);
10242 if (var == NULL)
10243 expand_option_idx = findoption(expand_option_name);
10244 }
10245
10246 if (expand_option_idx >= 0)
10247 {
10248 /* put string of option value in NameBuff */
10249 option_value2string(&options[expand_option_idx], expand_option_flags);
10250 var = NameBuff;
10251 }
10252 else if (var == NULL)
10253 var = (char_u *)"";
10254
10255 /* A backslash is required before some characters. This is the reverse of
10256 * what happens in do_set(). */
10257 buf = vim_strsave_escaped(var, escape_chars);
10258
10259 if (buf == NULL)
10260 {
10261 vim_free(*file);
10262 *file = NULL;
10263 return FAIL;
10264 }
10265
10266 #ifdef BACKSLASH_IN_FILENAME
10267 /* For MS-Windows et al. we don't double backslashes at the start and
10268 * before a file name character. */
10269 for (var = buf; *var != NUL; mb_ptr_adv(var))
10270 if (var[0] == '\\' && var[1] == '\\'
10271 && expand_option_idx >= 0
10272 && (options[expand_option_idx].flags & P_EXPAND)
10273 && vim_isfilec(var[2])
10274 && (var[2] != '\\' || (var == buf && var[4] != '\\')))
10275 STRMOVE(var, var + 1);
10276 #endif
10277
10278 *file[0] = buf;
10279 *num_file = 1;
10280 return OK;
10281 }
10282 #endif
10283
10284 /*
10285 * Get the value for the numeric or string option *opp in a nice format into
10286 * NameBuff[]. Must not be called with a hidden option!
10287 */
10288 static void
10289 option_value2string(opp, opt_flags)
10290 struct vimoption *opp;
10291 int opt_flags; /* OPT_GLOBAL and/or OPT_LOCAL */
10292 {
10293 char_u *varp;
10294
10295 varp = get_varp_scope(opp, opt_flags);
10296
10297 if (opp->flags & P_NUM)
10298 {
10299 long wc = 0;
10300
10301 if (wc_use_keyname(varp, &wc))
10302 STRCPY(NameBuff, get_special_key_name((int)wc, 0));
10303 else if (wc != 0)
10304 STRCPY(NameBuff, transchar((int)wc));
10305 else
10306 sprintf((char *)NameBuff, "%ld", *(long *)varp);
10307 }
10308 else /* P_STRING */
10309 {
10310 varp = *(char_u **)(varp);
10311 if (varp == NULL) /* just in case */
10312 NameBuff[0] = NUL;
10313 #ifdef FEAT_CRYPT
10314 /* don't show the actual value of 'key', only that it's set */
10315 else if (opp->var == (char_u *)&p_key && *varp)
10316 STRCPY(NameBuff, "*****");
10317 #endif
10318 else if (opp->flags & P_EXPAND)
10319 home_replace(NULL, varp, NameBuff, MAXPATHL, FALSE);
10320 /* Translate 'pastetoggle' into special key names */
10321 else if ((char_u **)opp->var == &p_pt)
10322 str2specialbuf(p_pt, NameBuff, MAXPATHL);
10323 else
10324 vim_strncpy(NameBuff, varp, MAXPATHL - 1);
10325 }
10326 }
10327
10328 /*
10329 * Return TRUE if "varp" points to 'wildchar' or 'wildcharm' and it can be
10330 * printed as a keyname.
10331 * "*wcp" is set to the value of the option if it's 'wildchar' or 'wildcharm'.
10332 */
10333 static int
10334 wc_use_keyname(varp, wcp)
10335 char_u *varp;
10336 long *wcp;
10337 {
10338 if (((long *)varp == &p_wc) || ((long *)varp == &p_wcm))
10339 {
10340 *wcp = *(long *)varp;
10341 if (IS_SPECIAL(*wcp) || find_special_key_in_table((int)*wcp) >= 0)
10342 return TRUE;
10343 }
10344 return FALSE;
10345 }
10346
10347 #ifdef FEAT_LANGMAP
10348 /*
10349 * Any character has an equivalent 'langmap' character. This is used for
10350 * keyboards that have a special language mode that sends characters above
10351 * 128 (although other characters can be translated too). The "to" field is a
10352 * Vim command character. This avoids having to switch the keyboard back to
10353 * ASCII mode when leaving Insert mode.
10354 *
10355 * langmap_mapchar[] maps any of 256 chars to an ASCII char used for Vim
10356 * commands.
10357 * When FEAT_MBYTE is defined langmap_mapga.ga_data is a sorted table of
10358 * langmap_entry_T. This does the same as langmap_mapchar[] for characters >=
10359 * 256.
10360 */
10361 # ifdef FEAT_MBYTE
10362 /*
10363 * With multi-byte support use growarray for 'langmap' chars >= 256
10364 */
10365 typedef struct
10366 {
10367 int from;
10368 int to;
10369 } langmap_entry_T;
10370
10371 static garray_T langmap_mapga;
10372 static void langmap_set_entry __ARGS((int from, int to));
10373
10374 /*
10375 * Search for an entry in "langmap_mapga" for "from". If found set the "to"
10376 * field. If not found insert a new entry at the appropriate location.
10377 */
10378 static void
10379 langmap_set_entry(from, to)
10380 int from;
10381 int to;
10382 {
10383 langmap_entry_T *entries = (langmap_entry_T *)(langmap_mapga.ga_data);
10384 int a = 0;
10385 int b = langmap_mapga.ga_len;
10386
10387 /* Do a binary search for an existing entry. */
10388 while (a != b)
10389 {
10390 int i = (a + b) / 2;
10391 int d = entries[i].from - from;
10392
10393 if (d == 0)
10394 {
10395 entries[i].to = to;
10396 return;
10397 }
10398 if (d < 0)
10399 a = i + 1;
10400 else
10401 b = i;
10402 }
10403
10404 if (ga_grow(&langmap_mapga, 1) != OK)
10405 return; /* out of memory */
10406
10407 /* insert new entry at position "a" */
10408 entries = (langmap_entry_T *)(langmap_mapga.ga_data) + a;
10409 mch_memmove(entries + 1, entries,
10410 (langmap_mapga.ga_len - a) * sizeof(langmap_entry_T));
10411 ++langmap_mapga.ga_len;
10412 entries[0].from = from;
10413 entries[0].to = to;
10414 }
10415
10416 /*
10417 * Apply 'langmap' to multi-byte character "c" and return the result.
10418 */
10419 int
10420 langmap_adjust_mb(c)
10421 int c;
10422 {
10423 langmap_entry_T *entries = (langmap_entry_T *)(langmap_mapga.ga_data);
10424 int a = 0;
10425 int b = langmap_mapga.ga_len;
10426
10427 while (a != b)
10428 {
10429 int i = (a + b) / 2;
10430 int d = entries[i].from - c;
10431
10432 if (d == 0)
10433 return entries[i].to; /* found matching entry */
10434 if (d < 0)
10435 a = i + 1;
10436 else
10437 b = i;
10438 }
10439 return c; /* no entry found, return "c" unmodified */
10440 }
10441 # endif
10442
10443 static void
10444 langmap_init()
10445 {
10446 int i;
10447
10448 for (i = 0; i < 256; i++)
10449 langmap_mapchar[i] = i; /* we init with a one-to-one map */
10450 # ifdef FEAT_MBYTE
10451 ga_init2(&langmap_mapga, sizeof(langmap_entry_T), 8);
10452 # endif
10453 }
10454
10455 /*
10456 * Called when langmap option is set; the language map can be
10457 * changed at any time!
10458 */
10459 static void
10460 langmap_set()
10461 {
10462 char_u *p;
10463 char_u *p2;
10464 int from, to;
10465
10466 #ifdef FEAT_MBYTE
10467 ga_clear(&langmap_mapga); /* clear the previous map first */
10468 #endif
10469 langmap_init(); /* back to one-to-one map */
10470
10471 for (p = p_langmap; p[0] != NUL; )
10472 {
10473 for (p2 = p; p2[0] != NUL && p2[0] != ',' && p2[0] != ';';
10474 mb_ptr_adv(p2))
10475 {
10476 if (p2[0] == '\\' && p2[1] != NUL)
10477 ++p2;
10478 }
10479 if (p2[0] == ';')
10480 ++p2; /* abcd;ABCD form, p2 points to A */
10481 else
10482 p2 = NULL; /* aAbBcCdD form, p2 is NULL */
10483 while (p[0])
10484 {
10485 if (p[0] == '\\' && p[1] != NUL)
10486 ++p;
10487 #ifdef FEAT_MBYTE
10488 from = (*mb_ptr2char)(p);
10489 #else
10490 from = p[0];
10491 #endif
10492 if (p2 == NULL)
10493 {
10494 mb_ptr_adv(p);
10495 if (p[0] == '\\')
10496 ++p;
10497 #ifdef FEAT_MBYTE
10498 to = (*mb_ptr2char)(p);
10499 #else
10500 to = p[0];
10501 #endif
10502 }
10503 else
10504 {
10505 if (p2[0] == '\\')
10506 ++p2;
10507 #ifdef FEAT_MBYTE
10508 to = (*mb_ptr2char)(p2);
10509 #else
10510 to = p2[0];
10511 #endif
10512 }
10513 if (to == NUL)
10514 {
10515 EMSG2(_("E357: 'langmap': Matching character missing for %s"),
10516 transchar(from));
10517 return;
10518 }
10519
10520 #ifdef FEAT_MBYTE
10521 if (from >= 256)
10522 langmap_set_entry(from, to);
10523 else
10524 #endif
10525 langmap_mapchar[from & 255] = to;
10526
10527 /* Advance to next pair */
10528 mb_ptr_adv(p);
10529 if (p2 == NULL)
10530 {
10531 if (p[0] == ',')
10532 {
10533 ++p;
10534 break;
10535 }
10536 }
10537 else
10538 {
10539 mb_ptr_adv(p2);
10540 if (*p == ';')
10541 {
10542 p = p2;
10543 if (p[0] != NUL)
10544 {
10545 if (p[0] != ',')
10546 {
10547 EMSG2(_("E358: 'langmap': Extra characters after semicolon: %s"), p);
10548 return;
10549 }
10550 ++p;
10551 }
10552 break;
10553 }
10554 }
10555 }
10556 }
10557 }
10558 #endif
10559
10560 /*
10561 * Return TRUE if format option 'x' is in effect.
10562 * Take care of no formatting when 'paste' is set.
10563 */
10564 int
10565 has_format_option(x)
10566 int x;
10567 {
10568 if (p_paste)
10569 return FALSE;
10570 return (vim_strchr(curbuf->b_p_fo, x) != NULL);
10571 }
10572
10573 /*
10574 * Return TRUE if "x" is present in 'shortmess' option, or
10575 * 'shortmess' contains 'a' and "x" is present in SHM_A.
10576 */
10577 int
10578 shortmess(x)
10579 int x;
10580 {
10581 return ( vim_strchr(p_shm, x) != NULL
10582 || (vim_strchr(p_shm, 'a') != NULL
10583 && vim_strchr((char_u *)SHM_A, x) != NULL));
10584 }
10585
10586 /*
10587 * paste_option_changed() - Called after p_paste was set or reset.
10588 */
10589 static void
10590 paste_option_changed()
10591 {
10592 static int old_p_paste = FALSE;
10593 static int save_sm = 0;
10594 #ifdef FEAT_CMDL_INFO
10595 static int save_ru = 0;
10596 #endif
10597 #ifdef FEAT_RIGHTLEFT
10598 static int save_ri = 0;
10599 static int save_hkmap = 0;
10600 #endif
10601 buf_T *buf;
10602
10603 if (p_paste)
10604 {
10605 /*
10606 * Paste switched from off to on.
10607 * Save the current values, so they can be restored later.
10608 */
10609 if (!old_p_paste)
10610 {
10611 /* save options for each buffer */
10612 for (buf = firstbuf; buf != NULL; buf = buf->b_next)
10613 {
10614 buf->b_p_tw_nopaste = buf->b_p_tw;
10615 buf->b_p_wm_nopaste = buf->b_p_wm;
10616 buf->b_p_sts_nopaste = buf->b_p_sts;
10617 buf->b_p_ai_nopaste = buf->b_p_ai;
10618 }
10619
10620 /* save global options */
10621 save_sm = p_sm;
10622 #ifdef FEAT_CMDL_INFO
10623 save_ru = p_ru;
10624 #endif
10625 #ifdef FEAT_RIGHTLEFT
10626 save_ri = p_ri;
10627 save_hkmap = p_hkmap;
10628 #endif
10629 /* save global values for local buffer options */
10630 p_tw_nopaste = p_tw;
10631 p_wm_nopaste = p_wm;
10632 p_sts_nopaste = p_sts;
10633 p_ai_nopaste = p_ai;
10634 }
10635
10636 /*
10637 * Always set the option values, also when 'paste' is set when it is
10638 * already on.
10639 */
10640 /* set options for each buffer */
10641 for (buf = firstbuf; buf != NULL; buf = buf->b_next)
10642 {
10643 buf->b_p_tw = 0; /* textwidth is 0 */
10644 buf->b_p_wm = 0; /* wrapmargin is 0 */
10645 buf->b_p_sts = 0; /* softtabstop is 0 */
10646 buf->b_p_ai = 0; /* no auto-indent */
10647 }
10648
10649 /* set global options */
10650 p_sm = 0; /* no showmatch */
10651 #ifdef FEAT_CMDL_INFO
10652 # ifdef FEAT_WINDOWS
10653 if (p_ru)
10654 status_redraw_all(); /* redraw to remove the ruler */
10655 # endif
10656 p_ru = 0; /* no ruler */
10657 #endif
10658 #ifdef FEAT_RIGHTLEFT
10659 p_ri = 0; /* no reverse insert */
10660 p_hkmap = 0; /* no Hebrew keyboard */
10661 #endif
10662 /* set global values for local buffer options */
10663 p_tw = 0;
10664 p_wm = 0;
10665 p_sts = 0;
10666 p_ai = 0;
10667 }
10668
10669 /*
10670 * Paste switched from on to off: Restore saved values.
10671 */
10672 else if (old_p_paste)
10673 {
10674 /* restore options for each buffer */
10675 for (buf = firstbuf; buf != NULL; buf = buf->b_next)
10676 {
10677 buf->b_p_tw = buf->b_p_tw_nopaste;
10678 buf->b_p_wm = buf->b_p_wm_nopaste;
10679 buf->b_p_sts = buf->b_p_sts_nopaste;
10680 buf->b_p_ai = buf->b_p_ai_nopaste;
10681 }
10682
10683 /* restore global options */
10684 p_sm = save_sm;
10685 #ifdef FEAT_CMDL_INFO
10686 # ifdef FEAT_WINDOWS
10687 if (p_ru != save_ru)
10688 status_redraw_all(); /* redraw to draw the ruler */
10689 # endif
10690 p_ru = save_ru;
10691 #endif
10692 #ifdef FEAT_RIGHTLEFT
10693 p_ri = save_ri;
10694 p_hkmap = save_hkmap;
10695 #endif
10696 /* set global values for local buffer options */
10697 p_tw = p_tw_nopaste;
10698 p_wm = p_wm_nopaste;
10699 p_sts = p_sts_nopaste;
10700 p_ai = p_ai_nopaste;
10701 }
10702
10703 old_p_paste = p_paste;
10704 }
10705
10706 /*
10707 * vimrc_found() - Called when a ".vimrc" or "VIMINIT" has been found.
10708 *
10709 * Reset 'compatible' and set the values for options that didn't get set yet
10710 * to the Vim defaults.
10711 * Don't do this if the 'compatible' option has been set or reset before.
10712 * When "fname" is not NULL, use it to set $"envname" when it wasn't set yet.
10713 */
10714 void
10715 vimrc_found(fname, envname)
10716 char_u *fname;
10717 char_u *envname;
10718 {
10719 int opt_idx;
10720 int dofree = FALSE;
10721 char_u *p;
10722
10723 if (!option_was_set((char_u *)"cp"))
10724 {
10725 p_cp = FALSE;
10726 for (opt_idx = 0; !istermoption(&options[opt_idx]); opt_idx++)
10727 if (!(options[opt_idx].flags & (P_WAS_SET|P_VI_DEF)))
10728 set_option_default(opt_idx, OPT_FREE, FALSE);
10729 didset_options();
10730 }
10731
10732 if (fname != NULL)
10733 {
10734 p = vim_getenv(envname, &dofree);
10735 if (p == NULL)
10736 {
10737 /* Set $MYVIMRC to the first vimrc file found. */
10738 p = FullName_save(fname, FALSE);
10739 if (p != NULL)
10740 {
10741 vim_setenv(envname, p);
10742 vim_free(p);
10743 }
10744 }
10745 else if (dofree)
10746 vim_free(p);
10747 }
10748 }
10749
10750 /*
10751 * Set 'compatible' on or off. Called for "-C" and "-N" command line arg.
10752 */
10753 void
10754 change_compatible(on)
10755 int on;
10756 {
10757 int opt_idx;
10758
10759 if (p_cp != on)
10760 {
10761 p_cp = on;
10762 compatible_set();
10763 }
10764 opt_idx = findoption((char_u *)"cp");
10765 if (opt_idx >= 0)
10766 options[opt_idx].flags |= P_WAS_SET;
10767 }
10768
10769 /*
10770 * Return TRUE when option "name" has been set.
10771 */
10772 int
10773 option_was_set(name)
10774 char_u *name;
10775 {
10776 int idx;
10777
10778 idx = findoption(name);
10779 if (idx < 0) /* unknown option */
10780 return FALSE;
10781 if (options[idx].flags & P_WAS_SET)
10782 return TRUE;
10783 return FALSE;
10784 }
10785
10786 /*
10787 * compatible_set() - Called when 'compatible' has been set or unset.
10788 *
10789 * When 'compatible' set: Set all relevant options (those that have the P_VIM)
10790 * flag) to a Vi compatible value.
10791 * When 'compatible' is unset: Set all options that have a different default
10792 * for Vim (without the P_VI_DEF flag) to that default.
10793 */
10794 static void
10795 compatible_set()
10796 {
10797 int opt_idx;
10798
10799 for (opt_idx = 0; !istermoption(&options[opt_idx]); opt_idx++)
10800 if ( ((options[opt_idx].flags & P_VIM) && p_cp)
10801 || (!(options[opt_idx].flags & P_VI_DEF) && !p_cp))
10802 set_option_default(opt_idx, OPT_FREE, p_cp);
10803 didset_options();
10804 }
10805
10806 #ifdef FEAT_LINEBREAK
10807
10808 # if defined(__BORLANDC__) && (__BORLANDC__ < 0x500)
10809 /* Borland C++ screws up loop optimisation here (negri) */
10810 #pragma option -O-l
10811 # endif
10812
10813 /*
10814 * fill_breakat_flags() -- called when 'breakat' changes value.
10815 */
10816 static void
10817 fill_breakat_flags()
10818 {
10819 char_u *p;
10820 int i;
10821
10822 for (i = 0; i < 256; i++)
10823 breakat_flags[i] = FALSE;
10824
10825 if (p_breakat != NULL)
10826 for (p = p_breakat; *p; p++)
10827 breakat_flags[*p] = TRUE;
10828 }
10829
10830 # if defined(__BORLANDC__) && (__BORLANDC__ < 0x500)
10831 #pragma option -O.l
10832 # endif
10833
10834 #endif
10835
10836 /*
10837 * Check an option that can be a range of string values.
10838 *
10839 * Return OK for correct value, FAIL otherwise.
10840 * Empty is always OK.
10841 */
10842 static int
10843 check_opt_strings(val, values, list)
10844 char_u *val;
10845 char **values;
10846 int list; /* when TRUE: accept a list of values */
10847 {
10848 return opt_strings_flags(val, values, NULL, list);
10849 }
10850
10851 /*
10852 * Handle an option that can be a range of string values.
10853 * Set a flag in "*flagp" for each string present.
10854 *
10855 * Return OK for correct value, FAIL otherwise.
10856 * Empty is always OK.
10857 */
10858 static int
10859 opt_strings_flags(val, values, flagp, list)
10860 char_u *val; /* new value */
10861 char **values; /* array of valid string values */
10862 unsigned *flagp;
10863 int list; /* when TRUE: accept a list of values */
10864 {
10865 int i;
10866 int len;
10867 unsigned new_flags = 0;
10868
10869 while (*val)
10870 {
10871 for (i = 0; ; ++i)
10872 {
10873 if (values[i] == NULL) /* val not found in values[] */
10874 return FAIL;
10875
10876 len = (int)STRLEN(values[i]);
10877 if (STRNCMP(values[i], val, len) == 0
10878 && ((list && val[len] == ',') || val[len] == NUL))
10879 {
10880 val += len + (val[len] == ',');
10881 new_flags |= (1 << i);
10882 break; /* check next item in val list */
10883 }
10884 }
10885 }
10886 if (flagp != NULL)
10887 *flagp = new_flags;
10888
10889 return OK;
10890 }
10891
10892 /*
10893 * Read the 'wildmode' option, fill wim_flags[].
10894 */
10895 static int
10896 check_opt_wim()
10897 {
10898 char_u new_wim_flags[4];
10899 char_u *p;
10900 int i;
10901 int idx = 0;
10902
10903 for (i = 0; i < 4; ++i)
10904 new_wim_flags[i] = 0;
10905
10906 for (p = p_wim; *p; ++p)
10907 {
10908 for (i = 0; ASCII_ISALPHA(p[i]); ++i)
10909 ;
10910 if (p[i] != NUL && p[i] != ',' && p[i] != ':')
10911 return FAIL;
10912 if (i == 7 && STRNCMP(p, "longest", 7) == 0)
10913 new_wim_flags[idx] |= WIM_LONGEST;
10914 else if (i == 4 && STRNCMP(p, "full", 4) == 0)
10915 new_wim_flags[idx] |= WIM_FULL;
10916 else if (i == 4 && STRNCMP(p, "list", 4) == 0)
10917 new_wim_flags[idx] |= WIM_LIST;
10918 else
10919 return FAIL;
10920 p += i;
10921 if (*p == NUL)
10922 break;
10923 if (*p == ',')
10924 {
10925 if (idx == 3)
10926 return FAIL;
10927 ++idx;
10928 }
10929 }
10930
10931 /* fill remaining entries with last flag */
10932 while (idx < 3)
10933 {
10934 new_wim_flags[idx + 1] = new_wim_flags[idx];
10935 ++idx;
10936 }
10937
10938 /* only when there are no errors, wim_flags[] is changed */
10939 for (i = 0; i < 4; ++i)
10940 wim_flags[i] = new_wim_flags[i];
10941 return OK;
10942 }
10943
10944 /*
10945 * Check if backspacing over something is allowed.
10946 */
10947 int
10948 can_bs(what)
10949 int what; /* BS_INDENT, BS_EOL or BS_START */
10950 {
10951 switch (*p_bs)
10952 {
10953 case '2': return TRUE;
10954 case '1': return (what != BS_START);
10955 case '0': return FALSE;
10956 }
10957 return vim_strchr(p_bs, what) != NULL;
10958 }
10959
10960 /*
10961 * Save the current values of 'fileformat' and 'fileencoding', so that we know
10962 * the file must be considered changed when the value is different.
10963 */
10964 void
10965 save_file_ff(buf)
10966 buf_T *buf;
10967 {
10968 buf->b_start_ffc = *buf->b_p_ff;
10969 buf->b_start_eol = buf->b_p_eol;
10970 #ifdef FEAT_MBYTE
10971 buf->b_start_bomb = buf->b_p_bomb;
10972
10973 /* Only use free/alloc when necessary, they take time. */
10974 if (buf->b_start_fenc == NULL
10975 || STRCMP(buf->b_start_fenc, buf->b_p_fenc) != 0)
10976 {
10977 vim_free(buf->b_start_fenc);
10978 buf->b_start_fenc = vim_strsave(buf->b_p_fenc);
10979 }
10980 #endif
10981 }
10982
10983 /*
10984 * Return TRUE if 'fileformat' and/or 'fileencoding' has a different value
10985 * from when editing started (save_file_ff() called).
10986 * Also when 'endofline' was changed and 'binary' is set, or when 'bomb' was
10987 * changed and 'binary' is not set.
10988 * Don't consider a new, empty buffer to be changed.
10989 */
10990 int
10991 file_ff_differs(buf)
10992 buf_T *buf;
10993 {
10994 /* In a buffer that was never loaded the options are not valid. */
10995 if (buf->b_flags & BF_NEVERLOADED)
10996 return FALSE;
10997 if ((buf->b_flags & BF_NEW)
10998 && buf->b_ml.ml_line_count == 1
10999 && *ml_get_buf(buf, (linenr_T)1, FALSE) == NUL)
11000 return FALSE;
11001 if (buf->b_start_ffc != *buf->b_p_ff)
11002 return TRUE;
11003 if (buf->b_p_bin && buf->b_start_eol != buf->b_p_eol)
11004 return TRUE;
11005 #ifdef FEAT_MBYTE
11006 if (!buf->b_p_bin && buf->b_start_bomb != buf->b_p_bomb)
11007 return TRUE;
11008 if (buf->b_start_fenc == NULL)
11009 return (*buf->b_p_fenc != NUL);
11010 return (STRCMP(buf->b_start_fenc, buf->b_p_fenc) != 0);
11011 #else
11012 return FALSE;
11013 #endif
11014 }
11015
11016 /*
11017 * return OK if "p" is a valid fileformat name, FAIL otherwise.
11018 */
11019 int
11020 check_ff_value(p)
11021 char_u *p;
11022 {
11023 return check_opt_strings(p, p_ff_values, FALSE);
11024 }
11025
11026 #ifdef FEAT_FULLSCREEN
11027 /*
11028 * Read the 'fuoptions' option, set fuoptions_flags and
11029 * fuoptions_bgcolor.
11030 */
11031 static int
11032 check_fuoptions(p_fuoptions, flags, bgcolor)
11033 char_u *p_fuoptions; /* fuoptions string */
11034 unsigned *flags; /* fuoptions flags */
11035 int *bgcolor; /* background highlight group id */
11036 {
11037 unsigned new_fuoptions_flags;
11038 int new_fuoptions_bgcolor;
11039 char_u *p;
11040 char_u hg_term; /* character terminating
11041 highlight group string in
11042 'background' option' */
11043 int i,j,k;
11044
11045 new_fuoptions_flags = 0;
11046 new_fuoptions_bgcolor = 0xFF000000;
11047
11048 for (p = p_fuoptions; *p; ++p)
11049 {
11050 for (i = 0; ASCII_ISALPHA(p[i]); ++i)
11051 ;
11052 if (p[i] != NUL && p[i] != ',' && p[i] != ':')
11053 return FAIL;
11054 if (i == 10 && STRNCMP(p, "background", 10) == 0)
11055 {
11056 if (p[i] != ':') return FAIL;
11057 i++;
11058 if (p[i] == NUL) return FAIL;
11059 if (p[i] == '#')
11060 {
11061 /* explicit color (#aarrggbb) */
11062 i++;
11063 for (j = i; j < i+8 && vim_isxdigit(p[j]); ++j)
11064 ;
11065 if (j < i+8)
11066 return FAIL; /* less than 8 digits */
11067 if (p[j] != NUL && p[j] != ',')
11068 return FAIL;
11069 new_fuoptions_bgcolor = 0;
11070 for (k = 0; k < 8; k++)
11071 new_fuoptions_bgcolor = new_fuoptions_bgcolor * 16 +
11072 hex2nr(p[i+k]);
11073 i = j;
11074 /* mark bgcolor as an explicit argb color */
11075 new_fuoptions_flags &= ~FUOPT_BGCOLOR_HLGROUP;
11076 }
11077 else
11078 {
11079 /* highlight group name */
11080 for (j = i; ASCII_ISALPHA(p[j]); ++j)
11081 ;
11082 if (p[j] != NUL && p[j] != ',')
11083 return FAIL;
11084 hg_term = p[j];
11085 p[j] = NUL; /* temporarily terminate string */
11086 new_fuoptions_bgcolor = syn_name2id((char_u*)(p+i));
11087 p[j] = hg_term; /* restore string */
11088 if (! new_fuoptions_bgcolor)
11089 return FAIL;
11090 i = j;
11091 /* mark bgcolor as highlight group id */
11092 new_fuoptions_flags |= FUOPT_BGCOLOR_HLGROUP;
11093 }
11094 }
11095 else if (i == 7 && STRNCMP(p, "maxhorz", 7) == 0)
11096 new_fuoptions_flags |= FUOPT_MAXHORZ;
11097 else if (i == 7 && STRNCMP(p, "maxvert", 7) == 0)
11098 new_fuoptions_flags |= FUOPT_MAXVERT;
11099 else
11100 return FAIL;
11101 p += i;
11102 if (*p == NUL)
11103 break;
11104 if (*p == ':')
11105 return FAIL;
11106 }
11107
11108 *flags = new_fuoptions_flags;
11109 *bgcolor = new_fuoptions_bgcolor;
11110
11111 /* Let the GUI know, in case the background color has changed. */
11112 gui_mch_fuopt_update();
11113
11114 return OK;
11115 }
11116 #endif
11117
Vim for the Mac