2 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
3 * Released under the terms of the GNU GPL v2.0.
19 static void conf_warning(const char *fmt
, ...)
20 __attribute__ ((format (printf
, 1, 2)));
22 static void conf_message(const char *fmt
, ...)
23 __attribute__ ((format (printf
, 1, 2)));
25 static const char *conf_filename
;
26 static int conf_lineno
, conf_warnings
, conf_unsaved
;
28 const char conf_defname
[] = "arch/$ARCH/defconfig";
30 static void conf_warning(const char *fmt
, ...)
34 fprintf(stderr
, "%s:%d:warning: ", conf_filename
, conf_lineno
);
35 vfprintf(stderr
, fmt
, ap
);
36 fprintf(stderr
, "\n");
41 static void conf_default_message_callback(const char *fmt
, va_list ap
)
48 static void (*conf_message_callback
) (const char *fmt
, va_list ap
) =
49 conf_default_message_callback
;
50 void conf_set_message_callback(void (*fn
) (const char *fmt
, va_list ap
))
52 conf_message_callback
= fn
;
55 static void conf_message(const char *fmt
, ...)
60 if (conf_message_callback
)
61 conf_message_callback(fmt
, ap
);
64 const char *conf_get_configname(void)
66 char *name
= getenv("KCONFIG_CONFIG");
68 return name
? name
: ".config";
71 const char *conf_get_autoconfig_name(void)
73 char *name
= getenv("KCONFIG_AUTOCONFIG");
75 return name
? name
: "include/config/auto.conf";
78 static char *conf_expand_value(const char *in
)
82 static char res_value
[SYMBOL_MAXLENGTH
];
83 char *dst
, name
[SYMBOL_MAXLENGTH
];
87 while ((src
= strchr(in
, '$'))) {
88 strncat(res_value
, in
, src
- in
);
91 while (isalnum(*src
) || *src
== '_')
94 sym
= sym_lookup(name
, 0);
96 strcat(res_value
, sym_get_string_value(sym
));
99 strcat(res_value
, in
);
104 char *conf_get_default_confname(void)
107 static char fullname
[PATH_MAX
+1];
110 name
= conf_expand_value(conf_defname
);
111 env
= getenv(SRCTREE
);
113 sprintf(fullname
, "%s/%s", env
, name
);
114 if (!stat(fullname
, &buf
))
120 static int conf_set_sym_val(struct symbol
*sym
, int def
, int def_flags
, char *p
)
127 sym
->def
[def
].tri
= mod
;
128 sym
->flags
|= def_flags
;
134 sym
->def
[def
].tri
= yes
;
135 sym
->flags
|= def_flags
;
139 sym
->def
[def
].tri
= no
;
140 sym
->flags
|= def_flags
;
143 conf_warning("symbol value '%s' invalid for %s", p
, sym
->name
);
147 for (p2
= p
; *p2
&& !isspace(*p2
); p2
++)
149 sym
->type
= S_STRING
;
156 for (p2
= p
; (p2
= strpbrk(p2
, "\"\\")); p2
++) {
161 memmove(p2
, p2
+ 1, strlen(p2
));
164 conf_warning("invalid string found");
171 if (sym_string_valid(sym
, p
)) {
172 sym
->def
[def
].val
= strdup(p
);
173 sym
->flags
|= def_flags
;
175 conf_warning("symbol value '%s' invalid for %s", p
, sym
->name
);
185 #define LINE_GROWTH 16
186 static int add_byte(int c
, char **lineptr
, size_t slen
, size_t *n
)
189 size_t new_size
= slen
+ 1;
191 new_size
+= LINE_GROWTH
- 1;
193 nline
= realloc(*lineptr
, new_size
);
201 (*lineptr
)[slen
] = c
;
206 static ssize_t
compat_getline(char **lineptr
, size_t *n
, FILE *stream
)
208 char *line
= *lineptr
;
212 int c
= getc(stream
);
216 if (add_byte(c
, &line
, slen
, n
) < 0)
221 if (add_byte('\0', &line
, slen
, n
) < 0)
228 if (add_byte(c
, &line
, slen
, n
) < 0)
240 int conf_read_simple(const char *name
, int def
)
244 size_t line_asize
= 0;
250 in
= zconf_fopen(name
);
252 struct property
*prop
;
254 name
= conf_get_configname();
255 in
= zconf_fopen(name
);
258 sym_add_change_count(1);
259 if (!sym_defconfig_list
) {
261 sym_calc_value(modules_sym
);
265 for_all_defaults(sym_defconfig_list
, prop
) {
266 if (expr_calc_value(prop
->visible
.expr
) == no
||
267 prop
->expr
->type
!= E_SYMBOL
)
269 name
= conf_expand_value(prop
->expr
->left
.sym
->name
);
270 in
= zconf_fopen(name
);
272 conf_message(_("using defaults found in %s"),
282 conf_filename
= name
;
287 def_flags
= SYMBOL_DEF
<< def
;
288 for_all_symbols(i
, sym
) {
289 sym
->flags
|= SYMBOL_CHANGED
;
290 sym
->flags
&= ~(def_flags
|SYMBOL_VALID
);
291 if (sym_is_choice(sym
))
292 sym
->flags
|= def_flags
;
297 if (sym
->def
[def
].val
)
298 free(sym
->def
[def
].val
);
301 sym
->def
[def
].val
= NULL
;
302 sym
->def
[def
].tri
= no
;
306 while (compat_getline(&line
, &line_asize
, in
) != -1) {
309 if (line
[0] == '#') {
310 if (memcmp(line
+ 2, CONFIG_
, strlen(CONFIG_
)))
312 p
= strchr(line
+ 2 + strlen(CONFIG_
), ' ');
316 if (strncmp(p
, "is not set", 10))
318 if (def
== S_DEF_USER
) {
319 sym
= sym_find(line
+ 2 + strlen(CONFIG_
));
321 sym_add_change_count(1);
325 sym
= sym_lookup(line
+ 2 + strlen(CONFIG_
), 0);
326 if (sym
->type
== S_UNKNOWN
)
327 sym
->type
= S_BOOLEAN
;
329 if (sym
->flags
& def_flags
) {
330 conf_warning("override: reassigning to symbol %s", sym
->name
);
335 sym
->def
[def
].tri
= no
;
336 sym
->flags
|= def_flags
;
341 } else if (memcmp(line
, CONFIG_
, strlen(CONFIG_
)) == 0) {
342 p
= strchr(line
+ strlen(CONFIG_
), '=');
346 p2
= strchr(p
, '\n');
352 if (def
== S_DEF_USER
) {
353 sym
= sym_find(line
+ strlen(CONFIG_
));
355 sym_add_change_count(1);
359 sym
= sym_lookup(line
+ strlen(CONFIG_
), 0);
360 if (sym
->type
== S_UNKNOWN
)
363 if (sym
->flags
& def_flags
) {
364 conf_warning("override: reassigning to symbol %s", sym
->name
);
366 if (conf_set_sym_val(sym
, def
, def_flags
, p
))
369 if (line
[0] != '\r' && line
[0] != '\n')
370 conf_warning("unexpected data");
374 if (sym
&& sym_is_choice_value(sym
)) {
375 struct symbol
*cs
= prop_get_symbol(sym_get_choice_prop(sym
));
376 switch (sym
->def
[def
].tri
) {
380 if (cs
->def
[def
].tri
== yes
) {
381 conf_warning("%s creates inconsistent choice state", sym
->name
);
382 cs
->flags
&= ~def_flags
;
386 if (cs
->def
[def
].tri
!= no
)
387 conf_warning("override: %s changes choice state", sym
->name
);
388 cs
->def
[def
].val
= sym
;
391 cs
->def
[def
].tri
= EXPR_OR(cs
->def
[def
].tri
, sym
->def
[def
].tri
);
398 sym_calc_value(modules_sym
);
402 int conf_read(const char *name
)
407 sym_set_change_count(0);
409 if (conf_read_simple(name
, S_DEF_USER
))
412 for_all_symbols(i
, sym
) {
414 if (sym_is_choice(sym
) || (sym
->flags
& SYMBOL_AUTO
))
416 if (sym_has_value(sym
) && (sym
->flags
& SYMBOL_WRITE
)) {
417 /* check that calculated value agrees with saved value */
421 if (sym
->def
[S_DEF_USER
].tri
!= sym_get_tristate_value(sym
))
423 if (!sym_is_choice(sym
))
427 if (!strcmp(sym
->curr
.val
, sym
->def
[S_DEF_USER
].val
))
431 } else if (!sym_has_value(sym
) && !(sym
->flags
& SYMBOL_WRITE
))
432 /* no previous value and not saved */
435 /* maybe print value in verbose mode... */
438 for_all_symbols(i
, sym
) {
439 if (sym_has_value(sym
) && !sym_is_choice_value(sym
)) {
440 /* Reset values of generates values, so they'll appear
441 * as new, if they should become visible, but that
442 * doesn't quite work if the Kconfig and the saved
443 * configuration disagree.
445 if (sym
->visible
== no
&& !conf_unsaved
)
446 sym
->flags
&= ~SYMBOL_DEF_USER
;
451 /* Reset a string value if it's out of range */
452 if (sym_string_within_range(sym
, sym
->def
[S_DEF_USER
].val
))
454 sym
->flags
&= ~(SYMBOL_VALID
|SYMBOL_DEF_USER
);
463 sym_add_change_count(conf_warnings
|| conf_unsaved
);
469 * Kconfig configuration printer
471 * This printer is used when generating the resulting configuration after
472 * kconfig invocation and `defconfig' files. Unset symbol might be omitted by
473 * passing a non-NULL argument to the printer.
477 kconfig_print_symbol(FILE *fp
, struct symbol
*sym
, const char *value
, void *arg
)
484 bool skip_unset
= (arg
!= NULL
);
487 fprintf(fp
, "# %s%s is not set\n",
496 fprintf(fp
, "%s%s=%s\n", CONFIG_
, sym
->name
, value
);
500 kconfig_print_comment(FILE *fp
, const char *value
, void *arg
)
502 const char *p
= value
;
506 l
= strcspn(p
, "\n");
510 xfwrite(p
, l
, 1, fp
);
519 static struct conf_printer kconfig_printer_cb
=
521 .print_symbol
= kconfig_print_symbol
,
522 .print_comment
= kconfig_print_comment
,
528 * This printer is used when generating the `include/generated/autoconf.h' file.
531 header_print_symbol(FILE *fp
, struct symbol
*sym
, const char *value
, void *arg
)
537 const char *suffix
= "";
546 fprintf(fp
, "#define %s%s%s 1\n",
547 CONFIG_
, sym
->name
, suffix
);
552 const char *prefix
= "";
554 if (value
[0] != '0' || (value
[1] != 'x' && value
[1] != 'X'))
556 fprintf(fp
, "#define %s%s %s%s\n",
557 CONFIG_
, sym
->name
, prefix
, value
);
562 fprintf(fp
, "#define %s%s %s\n",
563 CONFIG_
, sym
->name
, value
);
572 header_print_comment(FILE *fp
, const char *value
, void *arg
)
574 const char *p
= value
;
579 l
= strcspn(p
, "\n");
583 xfwrite(p
, l
, 1, fp
);
590 fprintf(fp
, " */\n");
593 static struct conf_printer header_printer_cb
=
595 .print_symbol
= header_print_symbol
,
596 .print_comment
= header_print_comment
,
602 * This printer is used when generating the `include/config/tristate.conf' file.
605 tristate_print_symbol(FILE *fp
, struct symbol
*sym
, const char *value
, void *arg
)
608 if (sym
->type
== S_TRISTATE
&& *value
!= 'n')
609 fprintf(fp
, "%s%s=%c\n", CONFIG_
, sym
->name
, (char)toupper(*value
));
612 static struct conf_printer tristate_printer_cb
=
614 .print_symbol
= tristate_print_symbol
,
615 .print_comment
= kconfig_print_comment
,
618 static void conf_write_symbol(FILE *fp
, struct symbol
*sym
,
619 struct conf_printer
*printer
, void *printer_arg
)
628 str
= sym_get_string_value(sym
);
629 str
= sym_escape_string_value(str
);
630 printer
->print_symbol(fp
, sym
, str
, printer_arg
);
634 str
= sym_get_string_value(sym
);
635 printer
->print_symbol(fp
, sym
, str
, printer_arg
);
640 conf_write_heading(FILE *fp
, struct conf_printer
*printer
, void *printer_arg
)
644 snprintf(buf
, sizeof(buf
),
646 "Automatically generated file; DO NOT EDIT.\n"
648 rootmenu
.prompt
->text
);
650 printer
->print_comment(fp
, buf
, printer_arg
);
654 * Write out a minimal config.
655 * All values that has default values are skipped as this is redundant.
657 int conf_write_defconfig(const char *filename
)
663 out
= fopen(filename
, "w");
667 sym_clear_all_valid();
669 /* Traverse all menus to find all relevant symbols */
670 menu
= rootmenu
.list
;
676 if (!menu_is_visible(menu
))
678 } else if (!sym_is_choice(sym
)) {
680 if (!(sym
->flags
& SYMBOL_WRITE
))
682 sym
->flags
&= ~SYMBOL_WRITE
;
683 /* If we cannot change the symbol - skip */
684 if (!sym_is_changable(sym
))
686 /* If symbol equals to default value - skip */
687 if (strcmp(sym_get_string_value(sym
), sym_get_string_default(sym
)) == 0)
691 * If symbol is a choice value and equals to the
692 * default for a choice - skip.
693 * But only if value is bool and equal to "y" and
694 * choice is not "optional".
695 * (If choice is "optional" then all values can be "n")
697 if (sym_is_choice_value(sym
)) {
701 cs
= prop_get_symbol(sym_get_choice_prop(sym
));
702 ds
= sym_choice_default(cs
);
703 if (!sym_is_optional(cs
) && sym
== ds
) {
704 if ((sym
->type
== S_BOOLEAN
) &&
705 sym_get_tristate_value(sym
) == yes
)
709 conf_write_symbol(out
, sym
, &kconfig_printer_cb
, NULL
);
712 if (menu
->list
!= NULL
) {
715 else if (menu
->next
!= NULL
) {
718 while ((menu
= menu
->parent
)) {
719 if (menu
->next
!= NULL
) {
730 int conf_write(const char *name
)
735 const char *basename
;
737 char tmpname
[PATH_MAX
+1], newname
[PATH_MAX
+1];
738 char *env
, *dirname
= NULL
;
740 if (name
&& name
[0]) {
744 if (!stat(name
, &st
) && S_ISDIR(st
.st_mode
)) {
745 dirname
= strndup(name
, strlen(name
) + 1);
746 strcat(dirname
, "/");
747 basename
= conf_get_configname();
748 } else if ((slash
= strrchr(name
, '/'))) {
749 int size
= slash
- name
+ 1;
750 dirname
= strndup(name
, size
);
752 basename
= slash
+ 1;
754 basename
= conf_get_configname();
758 dirname
= strdup(conf_get_configname());
759 basename
= strdup(base_name(dirname
));
760 dirname
= dir_name(dirname
);
762 sprintf(newname
, "%s%s", dirname
, basename
);
763 env
= getenv("KCONFIG_OVERWRITECONFIG");
765 sprintf(tmpname
, "%s.tmpconfig.%d", dirname
, (int)getpid());
766 out
= fopen(tmpname
, "w");
769 out
= fopen(newname
, "w");
775 conf_write_heading(out
, &kconfig_printer_cb
, NULL
);
777 if (!conf_get_changed())
778 sym_clear_all_valid();
780 menu
= rootmenu
.list
;
784 if (!menu_is_visible(menu
))
786 str
= menu_get_prompt(menu
);
791 } else if (!(sym
->flags
& SYMBOL_CHOICE
)) {
793 if (!(sym
->flags
& SYMBOL_WRITE
))
795 sym
->flags
&= ~SYMBOL_WRITE
;
797 conf_write_symbol(out
, sym
, &kconfig_printer_cb
, NULL
);
807 else while ((menu
= menu
->parent
)) {
817 dirname
= malloc(strlen(basename
) + 4 + 1);
818 strcpy(dirname
, basename
);
819 strcat(dirname
, ".old");
820 rename(newname
, dirname
);
822 if (rename(tmpname
, newname
))
826 conf_message(_("configuration written to %s"), newname
);
828 sym_set_change_count(0);
833 static int conf_split_config(void)
836 char path
[PATH_MAX
+1], opwd
[PATH_MAX
+1];
842 if (getcwd(opwd
, sizeof(opwd
)) == NULL
)
844 name
= conf_get_autoconfig_name();
845 conf_read_simple(name
, S_DEF_AUTO
);
854 for_all_symbols(i
, sym
) {
856 if ((sym
->flags
& SYMBOL_AUTO
) || !sym
->name
)
858 if (sym
->flags
& SYMBOL_WRITE
) {
859 if (sym
->flags
& SYMBOL_DEF_AUTO
) {
861 * symbol has old and new value,
867 if (sym_get_tristate_value(sym
) ==
868 sym
->def
[S_DEF_AUTO
].tri
)
874 if (!strcmp(sym_get_string_value(sym
),
875 sym
->def
[S_DEF_AUTO
].val
))
883 * If there is no old value, only 'no' (unset)
884 * is allowed as new value.
889 if (sym_get_tristate_value(sym
) == no
)
896 } else if (!(sym
->flags
& SYMBOL_DEF_AUTO
))
897 /* There is neither an old nor a new value. */
900 * There is an old value, but no new value ('no' (unset)
901 * isn't saved in auto.conf, so the old value is always
902 * different from 'no').
905 /* Replace all '_' and append ".h" */
910 *d
++ = (c
== '_') ? '/' : c
;
914 /* Assume directory path already exists. */
915 fd
= open(path
, O_WRONLY
| O_CREAT
| O_TRUNC
, 0644);
917 if (errno
!= ENOENT
) {
922 * Create directory components,
923 * unless they exist already.
926 while ((d
= strchr(d
, '/'))) {
928 if (stat(path
, &sb
) && mkdir(path
, 0755)) {
935 fd
= open(path
, O_WRONLY
| O_CREAT
| O_TRUNC
, 0644);
950 int conf_write_autoconf(void)
954 char cfg_fname
[PATH_MAX
+1], tristate_fname
[PATH_MAX
+1],
955 cfgh_fname
[PATH_MAX
+1];
957 FILE *out
, *tristate
, *out_h
;
960 sym_clear_all_valid();
962 sprintf(cfg_fname
, "%s.cmd", conf_get_autoconfig_name());
963 file_write_dep(cfg_fname
);
965 if (conf_split_config())
968 dirname
= dir_name(strdup(conf_get_configname()));
969 sprintf(cfg_fname
, "%s.tmpconfig", dirname
);
970 sprintf(tristate_fname
, "%s.tmpconfig_tristate", dirname
);
971 sprintf(cfgh_fname
, "%s.tmpconfig.h", dirname
);
974 out
= fopen(cfg_fname
, "w");
978 tristate
= fopen(tristate_fname
, "w");
984 out_h
= fopen(cfgh_fname
, "w");
991 conf_write_heading(out
, &kconfig_printer_cb
, NULL
);
993 conf_write_heading(tristate
, &tristate_printer_cb
, NULL
);
995 conf_write_heading(out_h
, &header_printer_cb
, NULL
);
997 for_all_symbols(i
, sym
) {
999 if (!(sym
->flags
& SYMBOL_WRITE
) || !sym
->name
)
1002 /* write symbol to auto.conf, tristate and header files */
1003 conf_write_symbol(out
, sym
, &kconfig_printer_cb
, (void *)1);
1005 conf_write_symbol(tristate
, sym
, &tristate_printer_cb
, (void *)1);
1007 conf_write_symbol(out_h
, sym
, &header_printer_cb
, NULL
);
1013 name
= getenv("KCONFIG_AUTOHEADER");
1015 name
= "include/generated/autoconf.h";
1016 if (rename(cfgh_fname
, name
))
1018 name
= getenv("KCONFIG_TRISTATE");
1020 name
= "include/config/tristate.conf";
1021 if (rename(tristate_fname
, name
))
1023 name
= conf_get_autoconfig_name();
1025 * This must be the last step, kbuild has a dependency on auto.conf
1026 * and this marks the successful completion of the previous steps.
1028 if (rename(cfg_fname
, name
))
1034 static int sym_change_count
;
1035 static void (*conf_changed_callback
)(void);
1037 void sym_set_change_count(int count
)
1039 int _sym_change_count
= sym_change_count
;
1040 sym_change_count
= count
;
1041 if (conf_changed_callback
&&
1042 (bool)_sym_change_count
!= (bool)count
)
1043 conf_changed_callback();
1046 void sym_add_change_count(int count
)
1048 sym_set_change_count(count
+ sym_change_count
);
1051 bool conf_get_changed(void)
1053 return sym_change_count
;
1056 void conf_set_changed_callback(void (*fn
)(void))
1058 conf_changed_callback
= fn
;
1061 static bool randomize_choice_values(struct symbol
*csym
)
1063 struct property
*prop
;
1069 * If choice is mod then we may have more items selected
1070 * and if no then no-one.
1071 * In both cases stop.
1073 if (csym
->curr
.tri
!= yes
)
1076 prop
= sym_get_choice_prop(csym
);
1078 /* count entries in choice block */
1080 expr_list_for_each_sym(prop
->expr
, e
, sym
)
1084 * find a random value and set it to yes,
1085 * set the rest to no so we have only one set
1087 def
= (rand() % cnt
);
1090 expr_list_for_each_sym(prop
->expr
, e
, sym
) {
1092 sym
->def
[S_DEF_USER
].tri
= yes
;
1093 csym
->def
[S_DEF_USER
].val
= sym
;
1096 sym
->def
[S_DEF_USER
].tri
= no
;
1098 sym
->flags
|= SYMBOL_DEF_USER
;
1099 /* clear VALID to get value calculated */
1100 sym
->flags
&= ~SYMBOL_VALID
;
1102 csym
->flags
|= SYMBOL_DEF_USER
;
1103 /* clear VALID to get value calculated */
1104 csym
->flags
&= ~(SYMBOL_VALID
);
1109 void set_all_choice_values(struct symbol
*csym
)
1111 struct property
*prop
;
1115 prop
= sym_get_choice_prop(csym
);
1118 * Set all non-assinged choice values to no
1120 expr_list_for_each_sym(prop
->expr
, e
, sym
) {
1121 if (!sym_has_value(sym
))
1122 sym
->def
[S_DEF_USER
].tri
= no
;
1124 csym
->flags
|= SYMBOL_DEF_USER
;
1125 /* clear VALID to get value calculated */
1126 csym
->flags
&= ~(SYMBOL_VALID
| SYMBOL_NEED_SET_CHOICE_VALUES
);
1129 bool conf_set_all_new_symbols(enum conf_def_mode mode
)
1131 struct symbol
*sym
, *csym
;
1132 int i
, cnt
, pby
, pty
, ptm
; /* pby: probability of boolean = y
1133 * pty: probability of tristate = y
1134 * ptm: probability of tristate = m
1137 pby
= 50; pty
= ptm
= 33; /* can't go as the default in switch-case
1138 * below, otherwise gcc whines about
1139 * -Wmaybe-uninitialized */
1140 if (mode
== def_random
) {
1142 char *env
= getenv("KCONFIG_PROBABILITY");
1144 while( env
&& *env
) {
1146 int tmp
= strtol( env
, &endp
, 10 );
1147 if( tmp
>= 0 && tmp
<= 100 ) {
1151 perror( "KCONFIG_PROBABILITY" );
1154 env
= (*endp
== ':') ? endp
+1 : endp
;
1161 pby
= p
[0]; ptm
= pby
/2; pty
= pby
-ptm
;
1164 pty
= p
[0]; ptm
= p
[1]; pby
= pty
+ ptm
;
1167 pby
= p
[0]; pty
= p
[1]; ptm
= p
[2];
1171 if( pty
+ptm
> 100 ) {
1173 perror( "KCONFIG_PROBABILITY" );
1177 bool has_changed
= false;
1179 for_all_symbols(i
, sym
) {
1180 if (sym_has_value(sym
) || (sym
->flags
& SYMBOL_VALID
))
1182 switch (sym_get_type(sym
)) {
1188 sym
->def
[S_DEF_USER
].tri
= yes
;
1191 sym
->def
[S_DEF_USER
].tri
= mod
;
1194 sym
->def
[S_DEF_USER
].tri
= no
;
1197 sym
->def
[S_DEF_USER
].tri
= no
;
1199 if (sym
->type
== S_TRISTATE
) {
1201 sym
->def
[S_DEF_USER
].tri
= yes
;
1202 else if (cnt
< (pty
+ptm
))
1203 sym
->def
[S_DEF_USER
].tri
= mod
;
1204 } else if (cnt
< pby
)
1205 sym
->def
[S_DEF_USER
].tri
= yes
;
1210 if (!(sym_is_choice(sym
) && mode
== def_random
))
1211 sym
->flags
|= SYMBOL_DEF_USER
;
1219 sym_clear_all_valid();
1222 * We have different type of choice blocks.
1223 * If curr.tri equals to mod then we can select several
1224 * choice symbols in one block.
1225 * In this case we do nothing.
1226 * If curr.tri equals yes then only one symbol can be
1227 * selected in a choice block and we set it to yes,
1228 * and the rest to no.
1230 if (mode
!= def_random
) {
1231 for_all_symbols(i
, csym
) {
1232 if ((sym_is_choice(csym
) && !sym_has_value(csym
)) ||
1233 sym_is_choice_value(csym
))
1234 csym
->flags
|= SYMBOL_NEED_SET_CHOICE_VALUES
;
1238 for_all_symbols(i
, csym
) {
1239 if (sym_has_value(csym
) || !sym_is_choice(csym
))
1242 sym_calc_value(csym
);
1243 if (mode
== def_random
)
1244 has_changed
= randomize_choice_values(csym
);
1246 set_all_choice_values(csym
);